Index: url-http.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/url/url-http.el,v
retrieving revision 1.28
diff -c -r1.28 url-http.el
*** url-http.el	7 Mar 2006 17:21:16 -0000	1.28
--- url-http.el	22 Apr 2006 15:39:45 -0000
***************
*** 386,391 ****
--- 386,393 ----
    (url-http-parse-response)
    (mail-narrow-to-head)
    ;;(narrow-to-region (point-min) url-http-end-of-headers)
+   (if (string= (downcase (mail-fetch-field "Connection")) "close")
+       (delete-process url-http-process))
    (let ((class nil)
  	(success nil))
      (setq class (/ url-http-response-status 100))