From 6e2988e60d95edb6f4c05ca6aa0e85622548adab Mon Sep 17 00:00:00 2001 From: Magnus Henoch Date: Wed, 15 Nov 2006 23:29:56 +0000 Subject: (url-http): Make proxy-object buffer-local, to handle proxied asynchronous connections correctly. --- lisp/url/ChangeLog | 3 +++ lisp/url/url-http.el | 4 +++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 27f463b0b97..93ebfef961c 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog @@ -1,5 +1,8 @@ 2006-11-15 Magnus Henoch + * url-http.el (url-http): Make proxy-object buffer-local, to + handle proxied asynchronous connections correctly. + * url-parse.el (url-generic-parse-url): Use with-temp-buffer. 2006-11-15 Shun-ichi GOTO (tiny change) diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index dc670188e26..69c04c51c28 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -1071,7 +1071,8 @@ CBARGS as the arguments." url-http-chunked-length url-http-chunked-start url-http-chunked-counter - url-http-process)) + url-http-process + proxy-object)) (let ((connection (url-http-find-free-connection (url-host url) (url-port url))) (buffer (generate-new-buffer (format " *http %s:%d*" @@ -1106,6 +1107,7 @@ CBARGS as the arguments." url-http-data url-http-target-url)) (set (make-local-variable var) nil)) + (make-local-variable 'proxy-object) (setq url-http-method (or url-request-method "GET") url-http-extra-headers url-request-extra-headers -- cgit v1.2.3