diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-04-29 22:15:59 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-04-29 22:15:59 +0000 |
| commit | 9516059404050d7ba391c5415d2684327ee55276 (patch) | |
| tree | 50d9c307d3d020134fae0ccc01ff686b86e57266 /lisp/tar-mode.el | |
| parent | 2ba993db418e3741acddb62b35b3dbb0eee4e797 (diff) | |
| download | emacs-9516059404050d7ba391c5415d2684327ee55276.tar.gz | |
(tar-extract): Use `!' instead of `:' to construct
buffer-file-name (`:' is invalid in file names on Windows).
Diffstat (limited to 'lisp/tar-mode.el')
| -rw-r--r-- | lisp/tar-mode.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index dce8bee126c..c2d2033a641 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el @@ -739,7 +739,8 @@ appear on disk when you save the tar-file's buffer." (insert-buffer-substring tar-buffer start end) (goto-char 0) (setq buffer-file-name - (expand-file-name (concat tarname ":" name))) + ;; `:' is not allowed on Windows + (expand-file-name (concat tarname "!" name))) (setq buffer-file-truename (abbreviate-file-name buffer-file-name)) ;; Set the default-directory to the dir of the |