From: Lars Magne Ingebrigtsen <larsi@quimbies.gnus.org>
Date: Sun, 29 Aug 2010 14:04:29 +0000 (+0200)
Subject: If we can't display the image, then display a broken lock instead.
X-Git-Url: http://cgit.sxemacs.org/?a=commitdiff_plain;h=db35b88ea6c22f12fc1ba4f2c0cbafbe9b275c2f;p=gnus

If we can't display the image, then display a broken lock instead.
---

diff --git a/lisp/gnus-html.el b/lisp/gnus-html.el
index 976da851d..f6cf00da3 100644
--- a/lisp/gnus-html.el
+++ b/lisp/gnus-html.el
@@ -149,9 +149,13 @@
 (defun gnus-html-put-image (file point)
   (let ((image (ignore-errors
 		 (create-image file))))
-    (when image
-      (put-image image point)
-      t)))
+    (if image
+	(progn
+	  (put-image image point)
+	  t)
+      (put-image (find-image '((:type xpm :file "lock-broken.xpm")))
+		 point)
+      nil)))
 
 (defun gnus-html-prune-cache ()
   (let ((total-size 0)