[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 7dc037e: * lisp/url/url-cookie.el: Fix warning and
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] master 7dc037e: * lisp/url/url-cookie.el: Fix warning and miscompilation |
Date: |
Tue, 10 Oct 2017 14:57:43 -0400 (EDT) |
branch: master
commit 7dc037e39e6bbfa8964d0040e8141dbcf70d726d
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* lisp/url/url-cookie.el: Fix warning and miscompilation
(url-cookie-parse-file-netscape): Remove unused var `match', fix
undefined `incf' misuse.
---
lisp/url/url-cookie.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/url/url-cookie.el b/lisp/url/url-cookie.el
index b0dc404..0a31032 100644
--- a/lisp/url/url-cookie.el
+++ b/lisp/url/url-cookie.el
@@ -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)
))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 7dc037e: * lisp/url/url-cookie.el: Fix warning and miscompilation,
Stefan Monnier <=