changeset 110387:23ce0716c272

gnus-html.el: Replace process-kill-without-query by gnus-set-process-query-on-exit-flag.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Fri, 17 Sep 2010 06:24:10 +0000
parents 93e14258e6bc
children 9c222728860c
files lisp/gnus/ChangeLog lisp/gnus/gnus-html.el
diffstat 2 files changed, 8 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Fri Sep 17 05:38:38 2010 +0000
+++ b/lisp/gnus/ChangeLog	Fri Sep 17 06:24:10 2010 +0000
@@ -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'.
--- a/lisp/gnus/gnus-html.el	Fri Sep 17 05:38:38 2010 +0000
+++ b/lisp/gnus/gnus-html.el	Fri Sep 17 06:24:10 2010 +0000
@@ -299,7 +299,7 @@
 		     "--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 @@
 		      "--location"
 		      "--max-time" "60"
 		      urls)))
-	  (process-kill-without-query process))))))
+	  (gnus-set-process-query-on-exit-flag process nil))))))
 
 (provide 'gnus-html)