]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix Tramp on MS Windows
authorMichael Albinus <michael.albinus@gmx.de>
Sun, 27 Aug 2023 18:06:13 +0000 (20:06 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Sun, 27 Aug 2023 18:06:13 +0000 (20:06 +0200)
* lisp/net/tramp-sh.el (tramp-sh-handle-expand-file-name):
Apply `tramp-drop-volume-letter' consequently.

lisp/net/tramp-sh.el

index ffd910b41c4b6dc30e52b72fdccc66aa86173528..5a1e73aab2b8485a0fd43cc8332dccaf3618e89c 100644 (file)
@@ -2825,7 +2825,8 @@ the result will be a local, non-Tramp, file name."
     (with-parsed-tramp-file-name name nil
       ;; If connection is not established yet, run the real handler.
       (if (not (tramp-connectable-p v))
-         (tramp-run-real-handler #'expand-file-name (list name))
+         (tramp-drop-volume-letter
+          (tramp-run-real-handler #'expand-file-name (list name)))
        (unless (tramp-run-real-handler #'file-name-absolute-p (list localname))
          (setq localname (concat "~/" localname)))
        ;; Tilde expansion if necessary.  This needs a shell which