aboutsummaryrefslogtreecommitdiff
path: root/lib/headlines.ml
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--lib/headlines.ml5
1 files changed, 1 insertions, 4 deletions
diff --git a/lib/headlines.ml b/lib/headlines.ml
index 654e389..915ba22 100644
--- a/lib/headlines.ml
+++ b/lib/headlines.ml
@@ -152,11 +152,8 @@ let rec render
| `Down -> scroll_down ()
| _ -> render t state)
| `Key (`ASCII '!', []) ->
- let selected_file, _ = Array.get content content_position in
+ let selected_file, content = Array.get content content_position in
let selected_file = Grep.execution_directory ^ "/" ^ selected_file in
- let content =
- Array.map (fun (_, c) -> c) content |> Array.to_list |> String.concat "\n"
- in
let (input_state : Input_prompt.state) =
{ screen = img
; user_input = ""