Ignore all errors from url-retrieve, for instance about invalid URLs.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 24afe1f..f9ba769 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-09-19  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-html.el (gnus-html-schedule-image-fetching): Ignore all errors
+       from url-retrieve, for instance about invalid URLs.
+
        * nnimap.el (nnimap-finish-retrieve-group-infos): Protect against
        groups that have no articles.
        (nnimap-request-article): Check that we really got an article when we

diff --git a/lisp/gnus-html.el b/lisp/gnus-html.el
index b2ecb5c..d3e8c48 100644 (file)
--- a/lisp/gnus-html.el
+++ b/lisp/gnus-html.el
@@ -298,9 +298,10 @@ fit these criteria."
   (gnus-message 8 "gnus-html-schedule-image-fetching: buffer %s, images %s"
                 buffer images)
   (dolist (image images)
-    (url-retrieve (car image)
-                  'gnus-html-image-fetched
-                  (list buffer image))))
+    (ignore-errors
+      (url-retrieve (car image)
+                   'gnus-html-image-fetched
+                   (list buffer image)))))
 
 (defun gnus-html-image-id (url)
   (expand-file-name (sha1 url) gnus-html-cache-directory))