summaryrefslogtreecommitdiff
path: root/lisp/image-mode.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2006-04-18 21:21:08 +0000
committerRichard M. Stallman <rms@gnu.org>2006-04-18 21:21:08 +0000
commitdf5b8a5364661aed18c7801c3ecfb3754b6f77c6 (patch)
tree60b5f11048219b9c5a08e158af3017f99a28765c /lisp/image-mode.el
parente58cec15eb396522c37329e43192e9b6c3098ea2 (diff)
downloademacs-df5b8a5364661aed18c7801c3ecfb3754b6f77c6.tar.gz
(image-toggle-display): Handle tar and arc subfiles.
Diffstat (limited to 'lisp/image-mode.el')
-rw-r--r--lisp/image-mode.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index 258f852a4d6..1a55676e3c7 100644
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -139,7 +139,11 @@ and showing the image as an image."
;; 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