diff options
| author | Michael Albinus | 2008-04-02 18:58:45 +0000 |
|---|---|---|
| committer | Michael Albinus | 2008-04-02 18:58:45 +0000 |
| commit | 113e2a8447cea12970b6e37ce3bd544628fa2cae (patch) | |
| tree | 2696e3bd337ac93bf22a9294d9cad6c9dd75d332 | |
| parent | 76be286d6412bde2fcbacbf4fdeb8f1e70e5ec80 (diff) | |
| download | emacs-113e2a8447cea12970b6e37ce3bd544628fa2cae.tar.gz emacs-113e2a8447cea12970b6e37ce3bd544628fa2cae.zip | |
* net/tramp.el (tramp-make-tramp-temp-file): Use
`tramp-drop-volume-letter' for the local file name part.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/net/tramp.el | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7a7f15493f4..b4593b6fba4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2008-04-02 Michael Albinus <michael.albinus@gmx.de> | ||
| 2 | |||
| 3 | * net/tramp.el (tramp-make-tramp-temp-file): Use | ||
| 4 | `tramp-drop-volume-letter' for the local file name part. | ||
| 5 | |||
| 1 | 2008-04-02 Dan Nicolaescu <dann@ics.uci.edu> | 6 | 2008-04-02 Dan Nicolaescu <dann@ics.uci.edu> |
| 2 | 7 | ||
| 3 | * progmodes/sh-script.el (sh-mode-map): Rename the menu. Add :help. | 8 | * progmodes/sh-script.el (sh-mode-map): Rename the menu. Add :help. |
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index b30667fa9fb..685c6bda298 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -1965,8 +1965,9 @@ Return the local name of the temporary file." | |||
| 1965 | (tramp-file-name-method vec) | 1965 | (tramp-file-name-method vec) |
| 1966 | (tramp-file-name-user vec) | 1966 | (tramp-file-name-user vec) |
| 1967 | (tramp-file-name-host vec) | 1967 | (tramp-file-name-host vec) |
| 1968 | (expand-file-name | 1968 | (tramp-drop-volume-letter |
| 1969 | tramp-temp-name-prefix (tramp-get-remote-tmpdir vec)))) | 1969 | (expand-file-name |
| 1970 | tramp-temp-name-prefix (tramp-get-remote-tmpdir vec))))) | ||
| 1970 | result) | 1971 | result) |
| 1971 | (while (not result) | 1972 | (while (not result) |
| 1972 | ;; `make-temp-file' would be the natural choice for | 1973 | ;; `make-temp-file' would be the natural choice for |