Treat 302 redirects as if they were 303 redirects

* lisp/url/url-http.el (url-http-parse-headers): Treat 302 as 303,
since this is what the standards recommend these days (bug#25703).
See https://en.wikipedia.org/wiki/List_of_HTTP_status_codes#3xx_Redirection

1 files changed, 6 insertions, 0 deletions

diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el
index aed0efab01a..e2d7a50e29c 100644
--- a/lisp/url/url-http.el
+++ b/lisp/url/url-http.el
@@ -623,6 +623,12 @@ should be shown to the user."
             ;; We do not support agent-driven negotiation, so we just
             ;; redirect to the preferred URI if one is provided.
             nil)
+           (`found                      ; 302
+            ;; 302 Found was ambiguously defined in the standards, but
+            ;; it's now recommended that it's treated like 303 instead
+            ;; of 307, since that's what most servers expect.
+            (setq url-http-method "GET"
+                  url-http-data nil))
            (`see-other                  ; 303
             ;; The response to the request can be found under a different
             ;; URI and SHOULD be retrieved using a GET method on that