emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master e185526d21: Fix XDS file name expansion


From: Po Lu
Subject: master e185526d21: Fix XDS file name expansion
Date: Sat, 15 Oct 2022 01:27:48 -0400 (EDT)

branch: master
commit e185526d216e544a70b2be77b34b5cb5386762d1
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    Fix XDS file name expansion
    
    * lisp/x-dnd.el (x-dnd-handle-xds-drop): Expand file names
    again.  That code was mistakenly removed.
---
 lisp/x-dnd.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/x-dnd.el b/lisp/x-dnd.el
index 2bda67fe3f..ee80e41a22 100644
--- a/lisp/x-dnd.el
+++ b/lisp/x-dnd.el
@@ -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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]