comparison lisp/url/url-cookie.el @ 86848:9bdd5616eaa8

(url-cookie-p): Declare as a function.
author Glenn Morris <rgm@gnu.org>
date Fri, 30 Nov 2007 08:05:38 +0000
parents 133e736aa5c6
children 63d3464511b4
comparison
equal deleted inserted replaced
86847:0152955185ee 86848:9bdd5616eaa8
85 (error 85 (error
86 ;; It's completely normal for the cookies file not to exist yet. 86 ;; It's completely normal for the cookies file not to exist yet.
87 ;; (message "Could not load cookie file %s" fname) 87 ;; (message "Could not load cookie file %s" fname)
88 ))) 88 )))
89 89
90 ;; check-declare does not handle defstruct. 90 (declare-function url-cookie-p "url-cookie" t t) ; defstruct
91 ;;;(declare-function url-cookie-p "url-cookie")
92 91
93 (defun url-cookie-clean-up (&optional secure) 92 (defun url-cookie-clean-up (&optional secure)
94 (let* ( 93 (let* (
95 (var (if secure 'url-cookie-secure-storage 'url-cookie-storage)) 94 (var (if secure 'url-cookie-secure-storage 'url-cookie-storage))
96 (val (symbol-value var)) 95 (val (symbol-value var))