aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2024-06-10 09:42:41 -0500
committerMarc Coquand <marc@mccd.space>2024-06-10 09:42:41 -0500
commit54ca685422a37b3ebf4e24596d094a708834f221 (patch)
treebc7a6253c4cc03111d3e74ab5c6824d3bb14952d
parent80c5317f3c7fdba007297582c54e366b4781e706 (diff)
downloadstitch-54ca685422a37b3ebf4e24596d094a708834f221.tar.gz
stitch-54ca685422a37b3ebf4e24596d094a708834f221.tar.bz2
stitch-54ca685422a37b3ebf4e24596d094a708834f221.zip
Change formatting: Remove bar
-rw-r--r--lib/grep.ml4
-rw-r--r--lib/stitch.ml1
2 files changed, 3 insertions, 2 deletions
diff --git a/lib/grep.ml b/lib/grep.ml
index 7b19a36..5989bc4 100644
--- a/lib/grep.ml
+++ b/lib/grep.ml
@@ -99,7 +99,7 @@ let pretty_format_todo ?(hide_file_name = false) parsed_headlines =
List.map
(fun (file_name, content) ->
if not hide_file_name
- then String.concat " | " [ pad file_name padding; content ]
+ then String.concat " " [ pad file_name padding; content ]
else content)
parsed_headlines
@@ -243,7 +243,7 @@ let pretty_format ?(hide_file_name = false) parsed_headlines =
Array.map
(fun (file_name, content) ->
if not hide_file_name
- then String.concat " | " [ pad file_name padding; content ]
+ then String.concat " " [ pad file_name padding; content ]
else content)
parsed_headlines
diff --git a/lib/stitch.ml b/lib/stitch.ml
index 31c247d..3383c83 100644
--- a/lib/stitch.ml
+++ b/lib/stitch.ml
@@ -19,6 +19,7 @@ let start (tag : string) () =
STITCH_DIRECTORY to the absolute path of your notes. For example: \
STITCH_DIRECTORY='/home/you/notes'."
else (
+ print_endline "Launching";
let term = Common.Term.create () in
let restore_headline_state = ref (fun () -> ()) in
let restore_done_state = ref (fun () -> ()) in