diff options
| -rw-r--r-- | src/lib.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/lib.lisp b/src/lib.lisp index 47e12f8..68629e6 100644 --- a/src/lib.lisp +++ b/src/lib.lisp @@ -86,7 +86,7 @@ (merge-pathnames ".config/oneliners.config" (user-homedir-pathname))) (defun cached-oneliners-file () - (merge-pathnames ".cached_oneliners" (user-homedir-pathname))) + (merge-pathnames ".cache/cached_oneliners" (user-homedir-pathname))) (defun wipe-cache () (uiop:delete-file-if-exists (cached-oneliners-file))) @@ -102,6 +102,7 @@ for id = (getf old :id) unless (find id new-ols :key (lambda (x) (getf x :id))) collect old)))) + (ensure-directories-exist (cached-oneliners-file)) (with-open-file (output (cached-oneliners-file) :direction :output :if-exists :supersede) (print updated output)))) |