mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-30 04:10:54 -08:00
(url-http-handle-cookies): Reverse list returned by
`mail-fetch-field', so that cookies are set in the correct order.
This commit is contained in:
parent
b4ddc815b7
commit
8c33dc1375
1 changed files with 2 additions and 2 deletions
|
|
@ -381,8 +381,8 @@ This allows us to use `mail-fetch-field', etc."
|
|||
"Handle all set-cookie / set-cookie2 headers in an HTTP response.
|
||||
The buffer must already be narrowed to the headers, so `mail-fetch-field' will
|
||||
work correctly."
|
||||
(let ((cookies (mail-fetch-field "Set-Cookie" nil nil t))
|
||||
(cookies2 (mail-fetch-field "Set-Cookie2" nil nil t)))
|
||||
(let ((cookies (nreverse (mail-fetch-field "Set-Cookie" nil nil t)))
|
||||
(cookies2 (nreverse (mail-fetch-field "Set-Cookie2" nil nil t))))
|
||||
(and cookies (url-http-debug "Found %d Set-Cookie headers" (length cookies)))
|
||||
(and cookies2 (url-http-debug "Found %d Set-Cookie2 headers" (length cookies2)))
|
||||
(while cookies
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue