stitch

Note taking for messy minimalists

commit 8aff6800c075677022d520c1cb374cf37badd34b
parent 664a8d8419f0376652709c71ff7e1e6fff5493f6
Author: Marc Coquand <marc@mccd.space>
Date:   Wed, 15 May 2024 19:40:04 -0500

Updates

Diffstat:
M
README.org
 | 
5
++---
M
lib/grep.ml
 | 
7
++-----
M
lib/help_screen.ml
 | 
2
+-

3 files changed, 5 insertions(+), 9 deletions(-)
diff --git a/README.org b/README.org
@@ -63,7 +63,7 @@ dune exec -- stitch
 - Building a journaling system
 You can build a basic capture command using $EDITOR and date command:
 
-#+begin_src
+#+begin_src sh
 export STITCH_DIRECTORY=/home/me/notes
 function capture {
   JRNL="$STITCH_DIRECTORY/$(date +'%y-%m-%d.%H:%M.%S').org"
@@ -88,8 +88,7 @@ alias jrnl="stitch -t journal"
 * KNOWN ISSUES
 
 - ugrep doesn't correctly handle ordering, meaning that if you sort by
-  modified date, it doesn't behave correctly. Therefore, that behavior
-  is disabled for now.
+  modified date, it doesn't behave correctly. I've waited with implementing it until I've resolved that issue
   
 
 
diff --git a/lib/grep.ml b/lib/grep.ml
@@ -1,8 +1,5 @@
-let execution_directory =
-  Sys.getenv_opt "STICH_DIRECTORY" |> Option.value ~default:"/home/mccd/notes-example"
-
-
-let grep_cmd = Sys.getenv_opt "STICH_GREP_CMD" |> Option.value ~default:"ugrep"
+let execution_directory = Sys.getenv "STITCH_DIRECTORY"
+let grep_cmd = Sys.getenv_opt "STICH_GREP_CMD" |> Option.value ~default:"grep"
 
 let tag_pattern =
   Sys.getenv_opt "STITCH_TAG_PATTERN" |> Option.value ~default:"\\:[a-z-]+\\:"
diff --git a/lib/help_screen.ml b/lib/help_screen.ml
@@ -4,7 +4,7 @@ open Notty
 type state = { go_back : unit -> unit }
 
 let render_info =
-  let title = I.strf ~attr:A.(st bold) "%s" "Stitch" |> I.pad ~l:0 ~t:0 in
+  let title = I.strf ~attr:A.(st bold) "%s" "Stitch - About" |> I.pad ~l:0 ~t:0 in
   let description =
     I.strf
       ~attr:A.(st bold)