Mercurial > emacs

changeset 63802:58812680c2fd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(url-http-create-request): When computing real-fname, call url-filename in both cases.
author Richard M. Stallman <rms@gnu.org>
date Tue, 28 Jun 2005 00:48:09 +0000
parents c234ee23e519
children 7675cc35c4cc
files lisp/url/url-http.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/url/url-http.el	Tue Jun 28 00:47:07 2005 +0000
+++ b/lisp/url/url-http.el	Tue Jun 28 00:48:09 2005 +0000
@@ -156,8 +156,7 @@
 		       (let ((url-basic-auth-storage
 			      'url-http-proxy-basic-auth-storage))
 			 (url-get-authentication url nil 'any nil))))
-	 (real-fname (if proxy-obj (url-recreate-url proxy-obj)
-		       (url-filename url)))
+	 (real-fname (url-filename (or proxy-obj url)))
 	 (host (url-host (or proxy-obj url)))
 	 (auth (if (cdr-safe (assoc "Authorization" url-request-extra-headers))
 		   nil