diff options
Diffstat (limited to 'lisp/tar-mode.el')
| -rw-r--r-- | lisp/tar-mode.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index fac148b2b63..399e2b2f066 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el @@ -679,10 +679,11 @@ appear on disk when you save the tar-file's buffer." (let* ((tar-buffer (current-buffer)) (tar-buffer-multibyte enable-multibyte-characters) (tarname (buffer-name)) - (bufname (concat (file-name-nondirectory name) - " (" - tarname - ")")) + (bufname (generate-new-buffer-name + (concat (file-name-nondirectory name) + " (" + tarname + ")"))) (read-only-p (or buffer-read-only view-p)) (buffer (get-buffer bufname)) (just-created nil) |