aboutsummaryrefslogtreecommitdiff
path: root/app/app.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'app/app.lisp')
-rw-r--r--app/app.lisp42
1 files changed, 23 insertions, 19 deletions
diff --git a/app/app.lisp b/app/app.lisp
index 677eed4..9b313db 100644
--- a/app/app.lisp
+++ b/app/app.lisp
@@ -68,6 +68,16 @@ export EDITOR=/usr/bin/zile
")
+(defparameter +icons-in-printout-docs+
+ "In the printout of oneliners, several unicode \"icons\" appear.
+Their meaning is as follows:
+
+- ⚠ : Indicates that the oneliner is flagged.
+- 🔒 : Indicates that the oneliner is locked.
+- 📋 : Indicates that the oneliner will be copied to the clipboard.
+
+")
+
;;; CLON SYNOPSIS DEFINITION
@@ -201,6 +211,8 @@ export EDITOR=/usr/bin/zile
(text :contents +configure-your-edtior+))
(group (:header "VARIABLES IN ONELINERS")
(text :contents +oneliners-variables-help-text+))
+ (group (:header "ICONS IN PRINTOUT")
+ (text :contents +icons-in-printout-docs+))
(group (:header "HELP MENU")
(text :contents "Usage: ol help [SECTION]")
(text :contents " ")
@@ -212,26 +224,18 @@ export EDITOR=/usr/bin/zile
#\newline
(tabulate-strings
40 5
- '("search"
- "run"
- "clip"
- "show"
- "new"
- "edit"
- "delete"
- "drafts"
- "trash"
- "publish"
- "flag"
- "lock"
- "redeem"
- "invite"
- "login"
- "whois"
- "password"
- "signature"))))
+ '("search" "run" "clip" "show" "new" "edit"
+ "delete" "drafts" "trash" "publish" "flag"
+ "lock" "redeem" "invite" "login" "whois"
+ "password" "signature"))))
(text :contents " ")
- (text :contents "Additional topics include: editor variables")))
+ (text :contents "Additional topics include:")
+(text :contents
+ (str:join
+ #\newline
+ (tabulate-strings
+ 40 5
+ '("variables" "editor" "icons"))))))
;;; HELPERS