mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00
Code Issues Releases Activity

* url-cookie.el (url-cookie-retrieve): Handle null LOCALPART (Bug#7543).

Browse Source 
Suggested by Lennart Borgman.
This commit is contained in:
Chong Yidong 2010-12-04 17:41:41 -05:00
parent 11cb1e35ff
commit 37bf6ce2b4
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/url/ChangeLog
View File

@ -1,3 +1,8 @@
2010-12-04 Chong Yidong <cyd@stupidchicken.com>
* url-cookie.el (url-cookie-retrieve): Handle null LOCALPART.
Suggested by Lennart Borgman (Bug#7543).
2010-09-18 Glenn Morris <rgm@gnu.org>
* url-cache.el (url-is-cached): Doc fix.

5
lisp/url/url-cookie.el
View File

@ -198,7 +198,7 @@ telling Microsoft that."
(and exp (> (float-time) (float-time (date-to-time exp))))))
(defun url-cookie-retrieve (host &optional localpart secure)
"Retrieve all the netscape-style cookies for a specified HOST and LOCALPART."
"Retrieve all cookies for a specified HOST and LOCALPART."
(let ((storage (if secure
(append url-cookie-secure-storage url-cookie-storage)
url-cookie-storage))
@ -226,7 +226,8 @@ telling Microsoft that."
(setq cur (car cookies)
cookies (cdr cookies)
localpart-match (url-cookie-localpart cur))
(if (and (if (stringp localpart-match)
(if (and (if (and (stringp localpart-match)
(stringp localpart))
(string-match (concat "^" (regexp-quote
localpart-match))
localpart)