[Emacs-diffs] master 8a1143b 10/12: Always use url-queue

[Lars Ingebrigtsen]

branch: master
commit 8a1143b7b6ca7270d1848111cc2edf539aced25b
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Always use url-queue
    
    * lisp/gnus/gnus-html.el (gnus-html-schedule-image-fetching):
    Always use url-queue.
---
 lisp/gnus/gnus-html.el |   12 ++++--------
 1 files changed, 4 insertions(+), 8 deletions(-)

diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el
index 6d6e094..1b289c2 100644
--- a/lisp/gnus/gnus-html.el
+++ b/lisp/gnus/gnus-html.el
@@ -40,6 +40,7 @@
 (require 'browse-url)
 (require 'mm-util)
 (require 'help-fns)
+(require 'url-queue)
 
 (defcustom gnus-html-image-cache-ttl (days-to-time 7)
   "Time used to determine if we should use images from the cache."
@@ -373,14 +374,9 @@ Use ALT-TEXT for the image string."
   "Retrieve IMAGE, and place it into BUFFER on arrival."
   (gnus-message 8 "gnus-html-schedule-image-fetching: buffer %s, image %s"
                 buffer image)
-  (if (fboundp 'url-queue-retrieve)
-      (url-queue-retrieve (car image)
-                         'gnus-html-image-fetched
-                         (list buffer image) t t)
-    (ignore-errors
-      (url-retrieve (car image)
-                   'gnus-html-image-fetched
-                   (list buffer image)))))
+  (url-queue-retrieve (car image)
+                     'gnus-html-image-fetched
+                     (list buffer image) t t))
 
 (defun gnus-html-image-fetched (status buffer image)
   "Callback function called when image has been fetched."