feat: add goto (G key) command

1 files changed, 5 insertions, 1 deletions

diff --git a/lib/editor.ml b/lib/editor.ml
index 5a68e53..ea2e68a 100644
--- a/lib/editor.ml
+++ b/lib/editor.ml
@@ -244,7 +244,7 @@ module Action = struct
     | None ->
         let word = word |> Sequence.to_list |> String.of_list in
         set_message (Printf.sprintf "Pattern not found: %s" word)
-    | Some (r, c) -> Buffer.Action.goto r c |> on_focused_buffer
+    | Some (r, c) -> Buffer.Action.goto ~r ~c |> on_focused_buffer
 
   (* Debug *)
   let get_rendered e = (e.rendered, e)
@@ -331,6 +331,10 @@ let handle_normal_command c =
     | Simple (Ctrl 'U') ->
         let* r, _ = get_terminal_size in
         Buffer.Action.move_up ~n:(r / 2) |> on_focused_buffer
+    | Shortcut (_, n, Goto) -> (
+        match n with
+        | None -> Buffer.Action.eof |> on_focused_buffer
+        | Some n -> Buffer.Action.goto ~r:n |> on_focused_buffer)
     (* Yank *)
     | Shortcut (r, n, Yank) ->
         let n = Option.value ~default:1 n - 1 in