Mercurial > emacs

diff lisp/image-mode.el @ 70097:3e313b3afda5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(image-toggle-display): Handle tar and arc subfiles.
author Richard M. Stallman <rms@gnu.org>
date Tue, 18 Apr 2006 21:21:08 +0000
parents c0b14a7a6a49
children 488f02720eed
line wrap: on
line diff
--- a/lisp/image-mode.el	Tue Apr 18 21:20:03 2006 +0000
+++ b/lisp/image-mode.el	Tue Apr 18 21:21:08 2006 +0000
@@ -139,7 +139,11 @@
     ;; was inserted
     (let* ((image
 	    (if (and (buffer-file-name)
-		     (not (buffer-modified-p)))
+		     (not (buffer-modified-p))
+		     (not (and (boundp 'archive-superior-buffer)
+			       archive-superior-buffer))
+		     (not (and (boundp 'tar-superior-buffer)
+			       tar-superior-buffer)))
 		(progn (clear-image-cache)
 		       (create-image (buffer-file-name)))
 	      (create-image