diff options
author | Po Lu <luangruo@yahoo.com> | 2022-05-09 10:13:43 +0800 |
---|---|---|
committer | Po Lu <luangruo@yahoo.com> | 2022-05-09 10:13:43 +0800 |
commit | 6ec29d0566042c65956d46fd1a30c6182ce0e537 (patch) | |
tree | 0a8d156131a4bf1271ee8c4d66a7c627c15b9b5c /lisp/cus-start.el | |
parent | fd8eaa72a611d050e1fe9c38c466c7812c7795dd (diff) | |
download | emacs-6ec29d0566042c65956d46fd1a30c6182ce0e537.tar.gz |
Allow disabling Motif drag protocol
* lisp/cus-start.el (standard): Add new variable.
* src/xterm.c (x_dnd_update_state, handle_one_xevent): Respect
new variable.
(syms_of_xterm): New variable `x-dnd-disable-motif-drag'.
Diffstat (limited to 'lisp/cus-start.el')
-rw-r--r-- | lisp/cus-start.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el index 83ab61b28b5..d8c4b480359 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -832,6 +832,7 @@ since it could result in memory overflow and make Emacs crash." (scroll-bar-adjust-thumb-portion windows boolean "24.4") (x-scroll-event-delta-factor mouse float "29.1") (x-gtk-use-native-input keyboard boolean "29.1") + (x-dnd-disable-motif-drag dnd boolean "29.1") ;; xselect.c (x-select-enable-clipboard-manager killing boolean "24.1") ;; xsettings.c @@ -870,6 +871,8 @@ since it could result in memory overflow and make Emacs crash." ((or (equal "scroll-bar-adjust-thumb-portion" (symbol-name symbol)) (equal "x-scroll-event-delta-factor" + (symbol-name symbol)) + (equal "x-dnd-disable-motif-drag" (symbol-name symbol))) (featurep 'x)) ((string-match "\\`x-" (symbol-name symbol)) |