diff options
| -rw-r--r-- | lisp/url/with-url.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/url/with-url.el b/lisp/url/with-url.el index 32b9f288880..b83accceeca 100644 --- a/lisp/url/with-url.el +++ b/lisp/url/with-url.el @@ -597,6 +597,8 @@ If given, return the value in BUFFER instead." ;; Redirects. ((<= 300 code 399) (cl-incf (url-request-redirect-times req)) + (when (memq code '(302 307)) + (setf (url-request-method req) 'get)) (cond ((not (url-request-follow-redirects req)) (with-url--callback process '(200 "Redirect not followed"))) |