diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/help_screen.ml | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lib/help_screen.ml b/lib/help_screen.ml index 0726be3..b07cad2 100644 --- a/lib/help_screen.ml +++ b/lib/help_screen.ml @@ -23,10 +23,10 @@ let general_help_menu = ; "Down", "Ctrl-n, j" ; "Up", "Ctrl-p, k" ; "Regexp", "r" - ; "Note view", "1" - ; "Todo view", "2" - ; "Done view", "3" - ; "Edit", "Enter, e" + ; "Note View", "1" + ; "Todo View", "2" + ; "Done View", "3" + ; "Edit File", "Enter, e" ] @@ -83,6 +83,7 @@ let rec render t ({ go_back } as state) = info_img </> general_img </> note_img </> todo_img </> done_img in Common.Term.image t img; + (* TODO: Add controls for scroll *) match Common.Term.event t with | `End | `Key (`Escape, []) | `Key (`ASCII 'q', []) | `Key (`ASCII 'C', [ `Ctrl ]) -> () | `Resize _ -> render t state |