aboutsummaryrefslogtreecommitdiff
path: root/lib/state.lisp
diff options
context:
space:
mode:
authorColin Okay <okay@toyful.space>2022-03-13 11:22:21 -0500
committerColin Okay <okay@toyful.space>2022-03-13 11:22:21 -0500
commit80bf9816c6e35bf7ffcc1e4349d5abf056c4df7f (patch)
tree817c3f8f40794c87cccd3ec027a50649e6544e57 /lib/state.lisp
parentb5b0204d6742c68a90a6388593b980864ae301c3 (diff)
updating helptexts; drafts-file function
Diffstat (limited to 'lib/state.lisp')
-rw-r--r--lib/state.lisp4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/state.lisp b/lib/state.lisp
index 0f69ff3..a156d59 100644
--- a/lib/state.lisp
+++ b/lib/state.lisp
@@ -63,6 +63,10 @@
"Returns the pathname holding the location of the cache."
(merge-pathnames ".cache/oneliners.cache" (user-homedir-pathname)))
+(defun drafts-file ()
+ "Returns the pathame holding the location of the oneliner drafts file."
+ (merge-pathnames ".cache/oneliners.drafts" (user-homedir-pathname)))
+
(defun wipe-cache ()
"Deletes the cache, if present."
(uiop:delete-file-if-exists (cached-oneliners-file)))