diff options
| author | Colin Okay <okay@toyful.space> | 2022-03-13 14:21:33 -0500 |
|---|---|---|
| committer | Colin Okay <okay@toyful.space> | 2022-03-13 14:21:33 -0500 |
| commit | 7bcf634c789c00a95237ad74e5f923a4214020c8 (patch) | |
| tree | 54274f67fc806b4fd57e8831ab11d4ccf4d5f371 /app/app.lisp | |
| parent | 7ae6cbff1875ea271fa1724d6e53bc3d3d48dd26 (diff) | |
can make, run, and publish drafts
Diffstat (limited to 'app/app.lisp')
| -rw-r--r-- | app/app.lisp | 7 |
1 files changed, 7 insertions, 0 deletions
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 <IDENTIFIER>") (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 <DRAFT>") + (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 <flag | unflag> <IDENTIFIER>") (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 |