Mercurial > emacs
changeset 64331:bb65f8cf3863
(url-http-parse-headers): Add :redirect arg-pair
when calling url-retrieve, to indicate a redirect.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 15 Jul 2005 05:12:09 +0000 |
| parents | ba29905c8f52 |
| children | d865cbe4d2b9 |
| files | lisp/url/url-http.el |
| diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/url/url-http.el Fri Jul 15 05:11:28 2005 +0000 +++ b/lisp/url/url-http.el Fri Jul 15 05:12:09 2005 +0000 @@ -501,8 +501,9 @@ (url-request-data url-http-data) (url-request-extra-headers url-http-extra-headers)) (url-retrieve redirect-uri url-callback-function - (cons redirect-uri - (cdr url-callback-arguments))) + (cons :redirect + (cons redirect-uri + url-callback-arguments))) (url-mark-buffer-as-dead (current-buffer)))))) (4 ; Client error ;; 400 Bad Request