diff options
| -rw-r--r-- | lisp/net/tramp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index 5930bcdd4fc..7371d38cbac 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -3564,7 +3564,8 @@ support symbolic links." | |||
| 3564 | (setq filename (substitute-in-file-name localname)) | 3564 | (setq filename (substitute-in-file-name localname)) |
| 3565 | (setq filename | 3565 | (setq filename |
| 3566 | (concat (file-remote-p filename) | 3566 | (concat (file-remote-p filename) |
| 3567 | (substitute-in-file-name localname)))))) | 3567 | (tramp-drop-volume-letter |
| 3568 | (substitute-in-file-name localname))))))) | ||
| 3568 | ;; "/m:h:~" does not work for completion. We use "/m:h:~/". | 3569 | ;; "/m:h:~" does not work for completion. We use "/m:h:~/". |
| 3569 | (if (and (stringp localname) (string-equal "~" localname)) | 3570 | (if (and (stringp localname) (string-equal "~" localname)) |
| 3570 | (concat filename "/") | 3571 | (concat filename "/") |