summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-async.el
diff options
context:
space:
mode:
authorKatsumi Yamaoka <yamaoka@jpl.org>2010-09-08 23:51:10 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2010-09-08 23:51:10 +0000
commit724d30bea033ed39739e757651692bcf27eb3e6e (patch)
tree841e47c0da34351c5ff71f1cdd4b31fb723412a9 /lisp/gnus/gnus-async.el
parentb073dc4b4b21ee5885c6c8d182d915115e51419b (diff)
downloademacs-724d30bea033ed39739e757651692bcf27eb3e6e.tar.gz
gnus-html.el (gnus-html-schedule-image-fetching): Decode entities before feeding URLs to curl.
gnus-async.el (gnus-async-article-callback): Call `gnus-html-prefetch-images' unconditionally.
Diffstat (limited to 'lisp/gnus/gnus-async.el')
-rw-r--r--lisp/gnus/gnus-async.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/gnus/gnus-async.el b/lisp/gnus/gnus-async.el
index 5b19adc2054..979e67120d1 100644
--- a/lisp/gnus/gnus-async.el
+++ b/lisp/gnus/gnus-async.el
@@ -237,13 +237,13 @@ that was fetched."
(setq gnus-async-current-prefetch-article nil)
(when arg
(gnus-async-set-buffer)
- (when gnus-async-post-fetch-function
- (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-html-prefetch-images summary))
+ (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-html-prefetch-images summary))
+ (when gnus-async-post-fetch-function
(funcall gnus-async-post-fetch-function summary))))
(gnus-async-with-semaphore
(setq