From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 5 May 2006 12:10:24 +0000 (+0000)
Subject: (url-http-parse-headers): Don't reuse connection if "Connection: close" header
X-Git-Tag: emacs-pretest-22.0.90~2799
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=48abdb63bfcc329482d9ceb0ce9a965085d16c86;p=emacs.git

(url-http-parse-headers): Don't reuse connection if "Connection: close" header
was seen.
---

diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index c401094593e..45bf97ec6b6 100644
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -386,6 +386,10 @@ should be shown to the user."
   (url-http-parse-response)
   (mail-narrow-to-head)
   ;;(narrow-to-region (point-min) url-http-end-of-headers)
+  (let ((connection (mail-fetch-field "Connection")))
+    (if (and connection
+	     (string= (downcase connection) "close"))
+	(delete-process url-http-process)))
   (let ((class nil)
 	(success nil))
     (setq class (/ url-http-response-status 100))