diff lisp/tar-mode.el @ 91367:c70e45a7acfd

Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-324
author Miles Bader <miles@gnu.org>
date Wed, 30 Jan 2008 07:57:28 +0000
parents 606f2d163a64 5f0db12a78bd
children 8e06d480f634
line wrap: on
line diff
--- a/lisp/tar-mode.el	Wed Jan 30 06:40:42 2008 +0000
+++ b/lisp/tar-mode.el	Wed Jan 30 07:57:28 2008 +0000
@@ -785,7 +785,8 @@
 	  (narrow-to-region (point-min) tar-header-offset)
 	  (goto-char pos)))
       (if view-p
-	  (view-buffer buffer (and just-created 'kill-buffer))
+	  (view-buffer
+	   buffer (and just-created 'kill-buffer-if-not-modified))
 	(if (eq other-window-p 'display)
 	    (display-buffer buffer)
 	  (if other-window-p