From c2a7ddb1f31351b0dff9ec562ed6d83f918acb59 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 1 Sep 2006 02:31:47 +0000 Subject: [PATCH] (url-http-create-request): Use `url-recreate-url-attributes' when setting real-fname. --- lisp/url/ChangeLog | 15 +++++++++++++-- lisp/url/url-http.el | 3 ++- 2 files changed, 15 insertions(+), 3 deletions(-) diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 135fdec0921..ad3912de67f 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog @@ -1,6 +1,17 @@ -2006-08-29 Diane Murray (tiny change) +2006-08-31 Diane Murray - * url-cookie.el (url-cookie-write-file): Really don't use versioned backups. + * url-parse.el (url-recreate-url-attributes): New function, code + simply moved from `url-recreate-url'. + (url-recreate-url): Use it. + Put the `url-target' at the end of the URL after the attributes. + + * url-http.el (url-http-create-request): + Use `url-recreate-url-attributes' when setting real-fname. + +2006-08-29 Diane Murray + + * url-cookie.el (url-cookie-write-file): Really don't use versioned + backups. 2006-08-25 Stefan Monnier diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index ae3a4b3e070..a1d87e1bd31 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -160,7 +160,8 @@ request.") (let ((url-basic-auth-storage 'url-http-proxy-basic-auth-storage)) (url-get-authentication url nil 'any nil)))) - (real-fname (url-filename (or proxy-obj url))) + (real-fname (concat (url-filename (or proxy-obj url)) + (url-recreate-url-attributes (or proxy-obj url)))) (host (url-host (or proxy-obj url))) (auth (if (cdr-safe (assoc "Authorization" url-request-extra-headers)) nil -- 2.39.2