diff options
| author | Jonathan Leech-Pepin <jonathan.leechpepin@gmail.com> | 2014-11-18 14:52:38 -0500 |
|---|---|---|
| committer | Jonathan Leech-Pepin <jonathan.leechpepin@gmail.com> | 2014-11-18 14:52:38 -0500 |
| commit | 7e3685bf944378c49738de2ee2c685af785806b6 (patch) | |
| tree | a21bc8b1051cb63de4211e4a00149f60d7e430d9 | |
| parent | b06364055527d93fcea18376befe060c28f97317 (diff) | |
Use `cl-remove-if` rather than `remove-if`
| -rw-r--r-- | sx-cache.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sx-cache.el b/sx-cache.el index 1e64f4f..a564a53 100644 --- a/sx-cache.el +++ b/sx-cache.el @@ -86,7 +86,7 @@ If SAVE-AUTH is non-nil, do not clear AUTH cache." (let ((caches (let ((default-directory sx-cache-directory)) (file-expand-wildcards "*.el")))) (when save-auth - (setq caches (remove-if (lambda (x) + (setq caches (cl-remove-if (lambda (x) (string= x "auth.el")) caches))) (lwarn 'stack-mode :debug "Invalidating: %S" caches) (mapc #'sx-cache--invalidate caches) |