[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] scratch/with-url 0013b14 2/2: Get relative redirects right
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] scratch/with-url 0013b14 2/2: Get relative redirects right |
Date: |
Mon, 23 Jan 2017 17:05:21 +0000 (UTC) |
branch: scratch/with-url
commit 0013b146f30da89bd86a8604f1faf87fe35a7dab
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Get relative redirects right
---
lisp/url/with-url.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/url/with-url.el b/lisp/url/with-url.el
index 7e85d99..d12b574 100644
--- a/lisp/url/with-url.el
+++ b/lisp/url/with-url.el
@@ -569,7 +569,9 @@ If given, return the value in BUFFER instead."
((> (url-request-redirect-times req) 10)
(with-url--callback process '(500 "Too many redirections")))
(t
- (with-url--redirect process (url-header 'location)))))
+ (with-url--redirect process
+ (url-expand-file-name
+ (url-header 'location) (url-request-url req))))))
(t
(with-url--callback process)))))