summaryrefslogtreecommitdiff
path: root/lisp/mouse.el
diff options
context:
space:
mode:
authorPo Lu <luangruo@yahoo.com>2022-03-16 17:03:19 +0800
committerPo Lu <luangruo@yahoo.com>2022-03-16 17:03:19 +0800
commite8d7139b4e069f4641a7e11261541acb4c5fff7b (patch)
treed70f006c6e91a65071079f374e9634b43a08bd5a /lisp/mouse.el
parent1babe5fb2d7575fb15e515fffd3387d60a975553 (diff)
downloademacs-e8d7139b4e069f4641a7e11261541acb4c5fff7b.tar.gz
Fix minor bugs with XDND support
* lisp/mouse.el (mouse-drag-and-drop-region): Report more selection targets for the benefit of Qt and Mozilla. * lisp/select.el (xselect--encode-string) (selection-converter-alist): Add new selection targets. * src/xterm.c (x_dnd_get_window_proxy): New function. (x_dnd_get_target_window): New argument proto_out, and return first window with XdndAware instead of bottommost window. (handle_one_xevent): Use new argument `proto_out'.
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r--lisp/mouse.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 4eead399252..3e7ae246975 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -3100,7 +3100,9 @@ is copied instead of being cut."
(x-hide-tip)
(gui-set-selection 'XdndSelection value-selection)
(let ((drag-action-or-frame
- (x-begin-drag '("UTF8_STRING" "STRING")
+ (x-begin-drag '("UTF8_STRING" "text/plain"
+ "text/plain;charset=utf-8"
+ "STRING" "TEXT" "COMPOUND_TEXT")
(if mouse-drag-and-drop-region-cut-when-buffers-differ
'XdndActionMove
'XdndActionCopy)