Always prefetch images for groups that want that.
authorLars Magne Ingebrigtsen <larsi@quimbies.gnus.org>
Mon, 6 Sep 2010 22:11:04 +0000 (00:11 +0200)
committerLars Magne Ingebrigtsen <larsi@quimbies.gnus.org>
Mon, 6 Sep 2010 22:11:04 +0000 (00:11 +0200)
lisp/ChangeLog
lisp/gnus-async.el

index 837a32c..7bb7bae 100644 (file)
@@ -1,5 +1,8 @@
 2010-09-06  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-async.el (gnus-async-article-callback): Always prefetch images
+       for groups that want that.
+
        * nntp.el (nntp-wait-for-string): Supply a timeout for
        accept-process-output to ensure progress.
 
index 1e9c1df..434afb6 100644 (file)
@@ -238,6 +238,9 @@ that was fetched."
        (save-excursion
          (save-restriction
            (narrow-to-region mark (point-max))
+           ;; Prefetch images for the groups that want that.
+           (when (fboundp 'gnus-html-prefetch-images)
+             (gnus-async-post-fetch-function summary))
            (funcall gnus-async-post-fetch-function summary))))
       (gnus-async-with-semaphore
        (setq