mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-17 10:27:41 +00:00
* lisp/url/url-cookie.el: Fix warning and miscompilation
(url-cookie-parse-file-netscape): Remove unused var `match', fix undefined `incf' misuse.
This commit is contained in:
parent
349c1f9302
commit
7dc037e39e
1 changed files with 2 additions and 2 deletions
|
|
@ -94,7 +94,7 @@ i.e. 1970-1-1) are loaded as expiring one year from now instead."
|
|||
;; (message "skipping empty line"))
|
||||
((= (length fields) 7)
|
||||
(let ((dom (nth 0 fields))
|
||||
(match (nth 1 fields))
|
||||
;; (match (nth 1 fields))
|
||||
(path (nth 2 fields))
|
||||
(secure (string= (nth 3 fields) "TRUE"))
|
||||
;; session cookies (expire time = 0) are supposed
|
||||
|
|
@ -112,7 +112,7 @@ i.e. 1970-1-1) are loaded as expiring one year from now instead."
|
|||
s)))))
|
||||
(key (nth 5 fields))
|
||||
(val (nth 6 fields)))
|
||||
(incf n)
|
||||
(cl-incf n)
|
||||
;;(message "adding <%s>=<%s> exp=<%s> dom=<%s> path=<%s> sec=%S" key val expires dom path secure)
|
||||
(url-cookie-store key val expires dom path secure)
|
||||
))
|
||||
|
|
|
|||
Loading…
Reference in a new issue