Commit a4f75188 authored by Eli Zaretskii's avatar Eli Zaretskii

Fix url-http use of url-current-object

* lisp/url/url-http.el (url-http): Bind url-current-object before
calling url-http-find-free-connection.  (Bug#28515)
parent 4a755ed4
...@@ -1249,6 +1249,9 @@ The return value of this function is the retrieval buffer." ...@@ -1249,6 +1249,9 @@ The return value of this function is the retrieval buffer."
(nsm-noninteractive (or url-request-noninteractive (nsm-noninteractive (or url-request-noninteractive
(and (boundp 'url-http-noninteractive) (and (boundp 'url-http-noninteractive)
url-http-noninteractive))) url-http-noninteractive)))
;; The following binding is needed in url-open-stream, which
;; is called from url-http-find-free-connection.
(url-current-object url)
(connection (url-http-find-free-connection (url-host url) (connection (url-http-find-free-connection (url-host url)
(url-port url) (url-port url)
gateway-method)) gateway-method))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment