# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1175334284 0
# Node ID 1fdf9fc79e3e431cbcc7e87085c2578a965b7d3a
# Parent  665998d6d5deb3bbfc030873cef692b77cab3c50
(url-http-mark-connection-as-busy, url-http-mark-connection-as-free): Clear
query-on-exit flag on idle connections.

diff -r 665998d6d5de -r 1fdf9fc79e3e lisp/url/url-http.el
--- a/lisp/url/url-http.el	Sat Mar 31 09:43:42 2007 +0000
+++ b/lisp/url/url-http.el	Sat Mar 31 09:44:44 2007 +0000
@@ -87,6 +87,7 @@
 
 (defun url-http-mark-connection-as-busy (host port proc)
   (url-http-debug "Marking connection as busy: %s:%d %S" host port proc)
+  (set-process-query-on-exit-flag proc t)
   (puthash (cons host port)
 	      (delq proc (gethash (cons host port) url-http-open-connections))
 	      url-http-open-connections)
@@ -97,6 +98,7 @@
   (when (memq (process-status proc) '(open run connect))
     (set-process-buffer proc nil)
     (set-process-sentinel proc 'url-http-idle-sentinel)
+    (set-process-query-on-exit-flag proc nil)
     (puthash (cons host port)
 	     (cons proc (gethash (cons host port) url-http-open-connections))
 	     url-http-open-connections))