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

2 files changed, 8 insertions, 2 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 39a00ee66f0..2891896ada4 100644
--- 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 dec8c5093bd..c390ae0bcf2 100644
--- 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)