Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 09:14:18 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix XDS file name expansion

Browse source 
* lisp/x-dnd.el (x-dnd-handle-xds-drop): Expand file names
again.  That code was mistakenly removed.
This commit is contained in:
Po Lu 2022-10-15 13:27:05 +08:00
parent 0bf3873b1c
commit e185526d21
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/x-dnd.el
View file

@ -1640,8 +1640,9 @@ VERSION is the version of the XDND protocol understood by SOURCE."
desired-name
(or file-name-coding-system
default-file-name-coding-system)))
(let ((name (funcall x-dnd-direct-save-function
t desired-name)))
(let ((name (expand-file-name
(funcall x-dnd-direct-save-function
t desired-name))))
(setq save-to name save-to-remote name))
(when save-to
(if (file-remote-p save-to)