diff options
Diffstat (limited to 'lib/headlines.ml')
| -rw-r--r-- | lib/headlines.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/headlines.ml b/lib/headlines.ml index 6b79262..36191bd 100644 --- a/lib/headlines.ml +++ b/lib/headlines.ml @@ -1,7 +1,7 @@ module Grep = Grep module Common = Common open Notty -module Input_screen = Input_screen +module Input_prompt = Input_prompt module Stitched_article = Stitched_article module Help_screen = Help_screen @@ -98,7 +98,7 @@ let rec render ; goto_done_view } | `Key (`ASCII 'r', []) -> - let (input_state : Input_screen.state) = + let (input_state : Input_prompt.state) = { screen = img ; user_input = "" ; prompt = "REGEXP: " @@ -116,7 +116,7 @@ let rec render render t state) } in - Input_screen.render t input_state + Input_prompt.render t input_state | `Key (`ASCII 'j', []) | `Key (`ASCII 'N', [ `Ctrl ]) -> scroll_down () | `Key (`ASCII 'k', []) | `Key (`ASCII 'P', [ `Ctrl ]) -> scroll_up () | `Key (`Arrow d, _) -> |