aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2010-09-22 23:04:01 -0700
committerGlenn Morris2010-09-22 23:04:01 -0700
commit8ea8e1744cd7349e854de27d615bb78fb94a6bd6 (patch)
treeb142d7926706a2db8dceddb0c31779b20a7ef9ab
parent48ff1664e2b76bea1f9c1fad8fb73e1c0d5ce849 (diff)
downloademacs-8ea8e1744cd7349e854de27d615bb78fb94a6bd6.tar.gz
emacs-8ea8e1744cd7349e854de27d615bb78fb94a6bd6.zip
Fix previous url-cache fix.
-rw-r--r--lisp/url/url-cache.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/url/url-cache.el b/lisp/url/url-cache.el
index 22095eb631d..677e03c37f3 100644
--- a/lisp/url/url-cache.el
+++ b/lisp/url/url-cache.el
@@ -198,12 +198,12 @@ If `url-standalone-mode' is non-nil, cached items never expire."
198 (if url-standalone-mode 198 (if url-standalone-mode
199 (not (file-exists-p (url-cache-create-filename url))) 199 (not (file-exists-p (url-cache-create-filename url)))
200 (let ((cache-time (url-is-cached url))) 200 (let ((cache-time (url-is-cached url)))
201 (and cache-time 201 (or (not cache-time)
202 (time-less-p 202 (time-less-p
203 (time-add 203 (time-add
204 cache-time 204 cache-time
205 (seconds-to-time (or expire-time url-cache-expire-time))) 205 (seconds-to-time (or expire-time url-cache-expire-time)))
206 (current-time)))))) 206 (current-time))))))
207 207
208(provide 'url-cache) 208(provide 'url-cache)
209 209