gnus-html-rescale-image: Fix up typo in rescaling.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index e2d34f4c739cefe941e63b62cb2220387cab0c85..18c5d55afe07da1563126bf51c4f481c023bed6c 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2010-09-02  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-html.el (gnus-html-rescale-image): Fix up typo in rescaling.
+
 2010-09-02  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-html.el (gnus-article-html): Make work buffer multibyte for

diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el
index 3948598d56176f8a7ed652c6db9cc1bd1850562a..a503859aa213c6275c78cdb3b6d11e013399527e 100644 (file)
--- a/lisp/gnus/gnus-html.el
+++ b/lisp/gnus/gnus-html.el
@@ -280,12 +280,12 @@ fit these criteria."
       (when (> height window-height)
        (setq image (or (create-image file 'imagemagick nil
                                      :height window-height)
-                       image))
-       (when (> (car (image-size image t)) window-width)
-         (setq image (or
-                      (create-image file 'imagemagick nil
-                                    :width window-width)
-                      image))))
+                       image)))
+      (when (> (car (image-size image t)) window-width)
+       (setq image (or
+                    (create-image file 'imagemagick nil
+                                  :width window-width)
+                    image)))
       image)))
 
 (defun gnus-html-prune-cache ()