summaryrefslogtreecommitdiff
path: root/lisp/cus-start.el
diff options
context:
space:
mode:
authorPo Lu <luangruo@yahoo.com>2022-05-09 10:13:43 +0800
committerPo Lu <luangruo@yahoo.com>2022-05-09 10:13:43 +0800
commit6ec29d0566042c65956d46fd1a30c6182ce0e537 (patch)
tree0a8d156131a4bf1271ee8c4d66a7c627c15b9b5c /lisp/cus-start.el
parentfd8eaa72a611d050e1fe9c38c466c7812c7795dd (diff)
downloademacs-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.el3
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))