[Emacs-diffs] /srv/bzr/emacs/trunk r109567: * lisp/url/url-http.el (url-http-create-request): Use url-http-proxy to

[Jason Rumney]

------------------------------------------------------------
revno: 109567
committer: Jason Rumney <address@hidden>
branch nick: trunk
timestamp: Sat 2012-08-11 22:48:37 +0800
message:
  * lisp/url/url-http.el (url-http-create-request): Use url-http-proxy to
  look up proxy credentials.
modified:
  lisp/url/ChangeLog
  lisp/url/url-http.el

=== modified file 'lisp/url/ChangeLog'
--- a/lisp/url/ChangeLog        2012-07-28 11:07:17 +0000
+++ b/lisp/url/ChangeLog        2012-08-11 14:48:37 +0000
@@ -1,3 +1,8 @@
+2012-08-11  Jason Rumney  <address@hidden>
+
+       * url-http.el (url-http-create-request): Use url-http-proxy to
+       look up proxy credentials.
+
 2012-07-28  David Engster  <address@hidden>
 
        * url-dav.el (url-dav-supported-p): Added doc-string and remove

=== modified file 'lisp/url/url-http.el'
--- a/lisp/url/url-http.el      2012-07-11 23:13:41 +0000
+++ b/lisp/url/url-http.el      2012-08-11 14:48:37 +0000
@@ -239,7 +239,7 @@
                         nil
                       (let ((url-basic-auth-storage
                              'url-http-proxy-basic-auth-storage))
-                        (url-get-authentication url-http-target-url nil 'any 
nil))))
+                        (url-get-authentication url-http-proxy nil 'any nil))))
         (real-fname (url-filename url-http-target-url))
         (host (url-host url-http-target-url))
         (auth (if (cdr-safe (assoc "Authorization" url-http-extra-headers))