aboutsummaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2024-05-18 13:03:40 -0500
committerMarc Coquand <marc@mccd.space>2024-05-18 13:03:40 -0500
commit256397061fe5ae5649b4569c45bb53c8e45e0cbe (patch)
tree652e7b5833ea32d13b0ae1ea9cc32ba421fed827 /bin
parent12ba5ed258b3a1ff30c3ece030e8eeed0dc417e9 (diff)
downloadstitch-256397061fe5ae5649b4569c45bb53c8e45e0cbe.tar.gz
stitch-256397061fe5ae5649b4569c45bb53c8e45e0cbe.tar.bz2
stitch-256397061fe5ae5649b4569c45bb53c8e45e0cbe.zip
Add support for arbitrary command in the note view
Diffstat (limited to '')
-rw-r--r--bin/main.ml20
1 files changed, 17 insertions, 3 deletions
diff --git a/bin/main.ml b/bin/main.ml
index 757b391..8fbefb1 100644
--- a/bin/main.ml
+++ b/bin/main.ml
@@ -61,7 +61,9 @@ let envs =
let headlines_cmd =
let doc = "write notes seperately and compose" in
let author = [ `S Manpage.s_authors; `P "Marc Coquand (mccd.space)" ] in
- let bugs = [ `S Manpage.s_bugs; `P "Email bug reports to marc@mccd.space" ] in
+ let bugs =
+ [ `S Manpage.s_bugs; `P "Email bug reports to ~marcc/stitch-general@lists.sr.ht." ]
+ in
let description =
[ `S Manpage.s_description
; `P
@@ -138,6 +140,16 @@ let headlines_cmd =
toggle the todo items."
]
in
+ let commands =
+ [ `S "COMMANDS"
+ ; `P ""
+ ; `P
+ "You can run arbitrary commands in Stitch. These commands can make use of \
+ variable substitutions. Available substitutions are"
+ ; `I ("%(file)", "Currently selected file")
+ ; `I ("%(content)", "Currently selected content")
+ ]
+ in
let credit =
[ `S "CREDIT"
; `P "Stitch was inspired by the note-taking tool Howm for EMacs by HIRAOKA Kazuyuki."
@@ -147,9 +159,11 @@ let headlines_cmd =
Cmd.info
~envs
"stitch"
- ~version:"0.0.2 ALPHA"
+ ~version:"0.0.3 ALPHA"
~doc
- ~man:(List.concat [ bugs; author; description; example_set_up_basic; credit ])
+ ~man:
+ (List.concat
+ [ description; commands; example_set_up_basic; bugs; author; credit ])
in
Cmd.v info headlines_t