1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

Fix typo in x-dnd-tests.el

* test/lisp/x-dnd-tests.el (x-begin-drag): Avoid extra leading /
in file names.  (bug#56712)
This commit is contained in:
Po Lu 2022-07-25 10:08:37 +08:00
parent 3c23ae13f0
commit 1a85545f2d

View file

@ -124,8 +124,8 @@ Return the result of the selection."
(format "file://%s%s" (system-name)
(expand-file-name x-dnd-tests-xds-property-value
x-dnd-tests-xds-target-dir))
(concat "file:///" (expand-file-name x-dnd-tests-xds-property-value
x-dnd-tests-xds-target-dir)))))
(concat "file://" (expand-file-name x-dnd-tests-xds-property-value
x-dnd-tests-xds-target-dir)))))
(setq x-dnd-tests-xds-property-value
(encode-coding-string (url-encode-url uri)
'raw-text)))