(url-http-find-free-connection): Fix braino in last fix.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index b5bc07cb170..60a279356b8 100644
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,3 +1,7 @@
+2006-03-07  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * url-http.el (url-http-find-free-connection): Fix braino in last fix.
+
 2006-03-05  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * url-http.el (url-http-find-free-connection): Don't kill the process
diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index a4a01958b2d..c401094593e 100644
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -124,7 +124,8 @@ request.")
            (unwind-protect
                (let ((proc (url-open-stream host buf host port)))
                  ;; Drop the temp buffer link before killing the buffer.
-                 (set-process-buffer proc nil))
+                 (set-process-buffer proc nil)
+                 proc)
              (kill-buffer buf)))))))
 
 ;; Building an HTTP request