* image-mode.el (image-toggle-display): Clear image cache if using

	filename.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e5cc3af773c9fa254d3d9cd60d31925531241cbd..eb76a4bc56d9299849e8bb561fcf46c174a7198f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-02-09  Chong Yidong  <cyd@stupidchicken.com>
+
+       * image-mode.el (image-toggle-display): Clear image cache if using
+       filename.
+
 2006-02-09 Masatake YAMATO  <jet@gyve.org>
 
        * dired-x.el (dired-guess-shell-alist-default): Add .man as

diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index e49ca27db7283a775dad18945225f48f6c734e21..258f852a4d68fdf371aa9362ebcb8b636e80b377 100644 (file)
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -140,7 +140,8 @@ and showing the image as an image."
     (let* ((image
            (if (and (buffer-file-name)
                     (not (buffer-modified-p)))
-               (create-image (buffer-file-name))
+               (progn (clear-image-cache)
+                      (create-image (buffer-file-name)))
              (create-image
               (string-make-unibyte
                (buffer-substring-no-properties (point-min) (point-max)))