diff options
| author | Michael Albinus | 2018-03-22 09:58:56 +0100 |
|---|---|---|
| committer | Michael Albinus | 2018-03-22 09:58:56 +0100 |
| commit | bbcd5787cb077f8b6c4eba5c1704ad953a298fd7 (patch) | |
| tree | 9a54395e178dc6ce6d9bed8a0812b43db1e65880 | |
| parent | aeb107b63022824c9844b0658cfe22de2c4c0ecd (diff) | |
| download | emacs-bbcd5787cb077f8b6c4eba5c1704ad953a298fd7.tar.gz emacs-bbcd5787cb077f8b6c4eba5c1704ad953a298fd7.zip | |
Fix commit c24c5dc4a4
* lisp/net/tramp.el (tramp-handle-substitute-in-file-name): Drop volume
letter of localname substitution. Reported by Chris Zheng
<chriszheng99@gmail.com>.
| -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 "/") |