diff options
author | Po Lu <luangruo@yahoo.com> | 2022-06-08 10:40:20 +0800 |
---|---|---|
committer | Po Lu <luangruo@yahoo.com> | 2022-06-08 10:40:20 +0800 |
commit | 3237d1d6b63c2a299f81dcb8b4f2833e00a7fedf (patch) | |
tree | 41ef3953c9d64693ac0271c8b80bbe15cf755e7d /lisp/dnd.el | |
parent | f3162b82406f2162a4208c6b626def14ba68a03a (diff) | |
download | emacs-3237d1d6b63c2a299f81dcb8b4f2833e00a7fedf.tar.gz |
Improve drag-and-drop tests
* lisp/dnd.el (dnd-begin-file-drag, dnd-begin-drag-files): Fix
type of `x-xdnd-username'.
* lisp/select.el (selection-converter-alist): Fix declaration of
_DT_NETFILE converter.
* test/lisp/dnd-tests.el (dnd-tests-verify-selection-data):
Handle "compound" selection converters.
(dnd-tests-parse-tt-netfile): New function.
(dnd-tests-begin-file-drag, dnd-tests-begin-drag-files): Verify
validity of file selection data.
Diffstat (limited to 'lisp/dnd.el')
-rw-r--r-- | lisp/dnd.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/dnd.el b/lisp/dnd.el index 0f65b5228d6..7eb43f5baab 100644 --- a/lisp/dnd.el +++ b/lisp/dnd.el @@ -423,7 +423,7 @@ currently being held down. It should only be called upon a (x-begin-drag '(;; Xdnd types used by GTK, Qt, and most other ;; modern programs that expect filenames to ;; be supplied as URIs. - "text/uri-list" "text/x-dnd-username" + "text/uri-list" "text/x-xdnd-username" ;; Traditional X selection targets used by ;; programs supporting the Motif ;; drag-and-drop protocols. Also used by NS @@ -493,7 +493,7 @@ FILES will be dragged." (x-begin-drag '(;; Xdnd types used by GTK, Qt, and most other ;; modern programs that expect filenames to ;; be supplied as URIs. - "text/uri-list" "text/x-dnd-username" + "text/uri-list" "text/x-xdnd-username" ;; Traditional X selection targets used by ;; programs supporting the Motif ;; drag-and-drop protocols. Also used by NS |