Mercurial > emacs
changeset 110179:b801b7109176
(gnus-html-show-images): If there are no images to show, then say so instead of bugging out.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Sat, 04 Sep 2010 15:28:57 +0000 |
| parents | 0d6f1624cdf7 |
| children | cc51dbea5a1c |
| files | lisp/gnus/ChangeLog lisp/gnus/gnus-html.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Sat Sep 04 15:24:35 2010 +0000 +++ b/lisp/gnus/ChangeLog Sat Sep 04 15:28:57 2010 +0000 @@ -1,5 +1,8 @@ 2010-09-04 Lars Magne Ingebrigtsen <larsi@gnus.org> + * gnus-html.el (gnus-html-show-images): If there are no images to show, + then say so instead of bugging out. + * gnus-agent.el (gnus-agent-load-alist): Check whether the agentview files exist before trying to read them.
--- a/lisp/gnus/gnus-html.el Sat Sep 04 15:24:35 2010 +0000 +++ b/lisp/gnus/gnus-html.el Sat Sep 04 15:28:57 2010 +0000 @@ -372,7 +372,9 @@ (while (setq overlay (pop overlays)) (when (overlay-get overlay 'gnus-image) (push (overlay-get overlay 'gnus-image) images))) - (gnus-html-schedule-image-fetching (current-buffer) images)))) + (if (not images) + (message "No images to show") + (gnus-html-schedule-image-fetching (current-buffer) images))))) ;;;###autoload (defun gnus-html-prefetch-images (summary)