[Emacs-diffs] Changes to emacs/lisp/gnus/mm-url.el,v

[Miles Bader]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Miles Bader <miles>     06/07/24 10:53:10

Index: mm-url.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/mm-url.el,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- mm-url.el   5 Feb 2006 13:56:44 -0000       1.13
+++ mm-url.el   24 Jul 2006 10:53:10 -0000      1.14
@@ -301,7 +301,13 @@
        (list url (buffer-size)))
     (mm-url-load-url)
     (let ((name buffer-file-name)
-         (url-request-extra-headers (list (cons "Connection" "Close")))
+         (url-request-extra-headers
+          ;; ISTM setting a Connection header was a workaround for
+          ;; older versions of url included with w3, but it does more
+          ;; harm than good with the one shipped with Emacs. --ansel
+          (if (not (and (boundp 'url-version)
+                        (equal url-version "Emacs")))
+              (list (cons "Connection" "Close"))))
          (url-package-name (or mm-url-package-name
                                url-package-name))
          (url-package-version (or mm-url-package-version