diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2017-01-23 22:00:06 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2017-01-23 22:00:06 +0100 |
| commit | 23a185ad11e297c27ac4242a212b78a2fd50b49c (patch) | |
| tree | 0ff0600ca5b8ae3b854eef2f81e2aa7cb9e92c01 | |
| parent | 58ddde579ef89ec18d893dca2cfb4e978a1f64fc (diff) | |
| download | emacs-scratch/with-url.tar.gz | |
Fix typo in last change.scratch/with-url
| -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)))))) |