diff options
| -rw-r--r-- | lisp/url/with-url.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/url/with-url.el b/lisp/url/with-url.el index 7107c050c16..82b72b42079 100644 --- a/lisp/url/with-url.el +++ b/lisp/url/with-url.el @@ -835,7 +835,8 @@ If the headers don't allow caching, nothing will be done." (dolist (file (directory-files-recursively (expand-file-name "url/cached" user-emacs-directory) "\\`[a-z0-9]+\\'")) - (when (time-less-p (file-attribute-modification-time file) cutoff) + (when (time-less-p + (file-attribute-modification-time (file-attributes file)) cutoff) (ignore-errors (delete-file file)))))) |