diff options
author | Richard M. Stallman <rms@gnu.org> | 2006-04-18 21:21:08 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2006-04-18 21:21:08 +0000 |
commit | df5b8a5364661aed18c7801c3ecfb3754b6f77c6 (patch) | |
tree | 60b5f11048219b9c5a08e158af3017f99a28765c /lisp/image-mode.el | |
parent | e58cec15eb396522c37329e43192e9b6c3098ea2 (diff) | |
download | emacs-df5b8a5364661aed18c7801c3ecfb3754b6f77c6.tar.gz emacs-df5b8a5364661aed18c7801c3ecfb3754b6f77c6.tar.bz2 emacs-df5b8a5364661aed18c7801c3ecfb3754b6f77c6.zip |
(image-toggle-display): Handle tar and arc subfiles.
Diffstat (limited to 'lisp/image-mode.el')
-rw-r--r-- | lisp/image-mode.el | 6 |
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 |