gnus-html.el: Replace process-kill-without-query by gnus-set-process-query-on-exit...

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 39a00ee66f0a17f2e476169440df6dbfc3220ad5..2891896ada40d2b78e7d264777c3bf44951152b5 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,9 @@
+2010-09-17  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-html.el (gnus-html-schedule-image-fetching)
+       (gnus-html-prefetch-images): Replace process-kill-without-query by
+       gnus-set-process-query-on-exit-flag.
+
 2010-09-16  Romain Francoise  <romain@orebokech.com>
 
        * gnus-html.el: Require gnus-art for `gnus-with-article-buffer'.

diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el
index dec8c5093bd2a63a7f33407319427f65afea3e60..c390ae0bcf2bda1dc0f426f807e2ddb661e6465b 100644 (file)
--- a/lisp/gnus/gnus-html.el
+++ b/lisp/gnus/gnus-html.el
@@ -299,7 +299,7 @@ fit these criteria."
                     "--max-time" "60"
                     "-o" (gnus-html-image-id url)
                     (mm-url-decode-entities-string url))))
-      (process-kill-without-query process)
+      (gnus-set-process-query-on-exit-flag process nil)
       (set-process-sentinel process 'gnus-html-curl-sentinel)
       (gnus-set-process-plist process (list 'images images
                                            'buffer buffer)))))
@@ -463,7 +463,7 @@ This only works if the article in question is HTML."
                      "--location"
                      "--max-time" "60"
                      urls)))
-         (process-kill-without-query process))))))
+         (gnus-set-process-query-on-exit-flag process nil))))))
 
 (provide 'gnus-html)