procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(url-cookie-retrieve): Fix last change.

Browse source
This commit is contained in:
Chong Yidong 2009-01-15 13:59:50 +00:00
parent 68fe704b63
commit 7feadb909b
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/url/url-cookie.el
View file

@ -251,10 +251,12 @@ telling Microsoft that."
(while cookies
(setq cur (car cookies)
cookies (cdr cookies)
localpart-match (let ((lp (url-cookie-localpart cur)))
(when lp
(concat "^" (regexp-quote lp)))))
(if (and (equal localpart localpart-match)
localpart-match (url-cookie-localpart cur))
(if (and (if (stringp localpart-match)
(string-match (concat "^" (regexp-quote
localpart-match))
localpart)
(equal localpart localpart-match))
(not (url-cookie-expired-p cur)))
(setq retval (cons cur retval))))))
retval))