* 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:
Stefan Monnier 2017-10-10 14:57:37 -04:00
parent 349c1f9302
commit 7dc037e39e

View file

@ -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)
))