mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

* gnus-art.el (article-display-face): Handle failure in gnus-create-image.

Browse source 
Fixes: debbugs:11802
This commit is contained in:
Chong Yidong 2012-08-14 13:34:20 +08:00
parent f48b82fd19
commit b4599732c3
2 changed files with 9 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2012-08-14 Chong Yidong <cyd@gnu.org>
* gnus-art.el (article-display-face): Handle failure in
gnus-create-image (Bug#11802).
2012-08-10 Stefan Monnier <monnier@iro.umontreal.ca>
* gnus-agent.el (gnus-agent-cat-defaccessor, gnus-agent-cat-groups):

7
lisp/gnus/gnus-art.el
View file

@ -2437,9 +2437,10 @@ long lines if and only if arg is positive."
(apply 'gnus-create-image png 'png t
(cdr (assq 'png gnus-face-properties-alist))))
(goto-char from)
(gnus-add-wash-type 'face)
(gnus-add-image 'face image)
(gnus-put-image image nil 'face))))))))))
(when image
(gnus-add-wash-type 'face)
(gnus-add-image 'face image)
(gnus-put-image image nil 'face)))))))))))
(defun article-display-x-face (&optional force)
"Look for an X-Face header and display it if present."