Mercurial > emacs

changeset 63819:6a70b4f2e463

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(url-http-create-request): Call url-recreate-url in proxy case.
author Richard M. Stallman <rms@gnu.org>
date Tue, 28 Jun 2005 21:35:18 +0000
parents 75b7da639bba
children 3fd0a6dee50f
files lisp/url/url-http.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/url/url-http.el	Tue Jun 28 19:08:07 2005 +0000
+++ b/lisp/url/url-http.el	Tue Jun 28 21:35:18 2005 +0000
@@ -199,7 +199,9 @@
     (setq request
 	  (concat
 	   ;; The request
-	   (or url-request-method "GET") " " real-fname " HTTP/" url-http-version "\r\n"
+	   (or url-request-method "GET") " "
+	   (if proxy-obj (url-recreate-url proxy-obj) real-fname)
+	   " HTTP/" url-http-version "\r\n"
 	   ;; Version of MIME we speak
 	   "MIME-Version: 1.0\r\n"
 	   ;; (maybe) Try to keep the connection open