diff options
| -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 76259bb20fb..31bbde0e004 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el | |||
| @@ -624,10 +624,11 @@ directory listing." | |||
| 624 | (if view-p | 624 | (if view-p |
| 625 | (progn | 625 | (progn |
| 626 | (view-buffer buffer) | 626 | (view-buffer buffer) |
| 627 | (and just-created (kill-buffer buffer))) | 627 | (and just-created |
| 628 | (if other-window-p | 628 | (setq view-exit-action 'kill-buffer))) |
| 629 | (switch-to-buffer-other-window buffer) | 629 | (if other-window-p |
| 630 | (switch-to-buffer buffer)))))) | 630 | (switch-to-buffer-other-window buffer) |
| 631 | (switch-to-buffer buffer)))))) | ||
| 631 | 632 | ||
| 632 | 633 | ||
| 633 | (defun tar-extract-other-window () | 634 | (defun tar-extract-other-window () |