diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/gnus/ChangeLog | 1 | ||||
-rw-r--r-- | lisp/gnus/gnus-html.el | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 4acb6a8a621..e2d34f4c739 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -2,6 +2,7 @@ * gnus-html.el (gnus-article-html): Make work buffer multibyte for decoded contents. + (gnus-html-put-image, gnus-html-rescale-image): Pass `file' argument. 2010-09-02 Lars Magne Ingebrigtsen <larsi@gnus.org> diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el index 80eaae68052..3948598d561 100644 --- a/lisp/gnus/gnus-html.el +++ b/lisp/gnus/gnus-html.el @@ -255,7 +255,7 @@ fit these criteria." (= (car (image-size image t)) 30) (= (cdr (image-size image t)) 30)))) (progn - (gnus-put-image (gnus-html-rescale-image image) + (gnus-put-image (gnus-html-rescale-image image file) (gnus-string-or string "*")) t) (insert string) @@ -265,7 +265,7 @@ fit these criteria." (gnus-string-or string "*"))) nil))))) -(defun gnus-html-rescale-image (image) +(defun gnus-html-rescale-image (image file) (if (or (not (fboundp 'imagemagick-types)) (not (get-buffer-window (current-buffer)))) image |