]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/url/url-cookie.el: Fix warning and miscompilation
authorStefan Monnier <monnier@iro.umontreal.ca>
Tue, 10 Oct 2017 18:57:37 +0000 (14:57 -0400)
committerStefan Monnier <monnier@iro.umontreal.ca>
Tue, 10 Oct 2017 18:57:37 +0000 (14:57 -0400)
(url-cookie-parse-file-netscape): Remove unused var `match', fix
undefined `incf' misuse.

lisp/url/url-cookie.el

index b0dc40475b306c0b046199e15805b2a059047fe4..0a3103264d91f8f02ba1bf89819891d405489c02 100644 (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)
                ))