From 7bcf634c789c00a95237ad74e5f923a4214020c8 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Sun, 13 Mar 2022 14:21:33 -0500 Subject: can make, run, and publish drafts --- app/app.lisp | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'app/app.lisp') diff --git a/app/app.lisp b/app/app.lisp index 86c7328..8e89a93 100644 --- a/app/app.lisp +++ b/app/app.lisp @@ -124,6 +124,10 @@ export EDITOR=/usr/bin/zile (text :contents "Usage: ol edit ") (text :contents " ") (text :contents "Interactively alter a oneliner and uplaod it to the server.")) + (group (:header "PUBLISHING ONELINERS" :hidden t) + (text :contents "Usage: ol publish ") + (text :contents " ") + (text :contents "Submits a draft oneliner to the wiki server, and, when successful, deletes the draft.")) (group (:header "FLAGGING AND UNFLAGGING ONELINERS" :hidden t) (text :contents "Usage: ol ") (text :contents " ") @@ -171,6 +175,7 @@ export EDITOR=/usr/bin/zile (text :contents "show") (text :contents "new") (text :contents "edit") + (text :contents "publish") (text :contents "flag") (text :contents "lock") (text :contents "redeem") @@ -228,6 +233,8 @@ than the users." (cli:add-new-oneliner)) (:edit (cli:edit-item id-or-name)) + (:publish + (cli::publish-draft id-or-name)) (:flag (cli:flag-item id-or-name)) (:unflag -- cgit v1.2.3