From b177712c7ac2563cbfad48927452d9544cbafd22 Mon Sep 17 00:00:00 2001
From: Federico Igne <undyamon@disroot.org>
Date: Thu, 11 Jan 2024 19:38:04 +0100
Subject: refactor: revert temporary naming

---
 bin/main.ml   | 2 +-
 lib/editor.ml | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/bin/main.ml b/bin/main.ml
index 75328c9..932c452 100644
--- a/bin/main.ml
+++ b/bin/main.ml
@@ -4,5 +4,5 @@ let () =
   let open Editor in
   let cli = Config.parse Sys.argv in
   let editor = Editor.init cli in
-  let rec loop () = Action.(render *> handle_next_command2 >>= loop) in
+  let rec loop () = Action.(render *> handle_next_command >>= loop) in
   Action.eval ~editor loop
diff --git a/lib/editor.ml b/lib/editor.ml
index c3e298e..a516b25 100644
--- a/lib/editor.ml
+++ b/lib/editor.ml
@@ -255,7 +255,7 @@ let handle_normal_command =
       Buffer.Action.delete_to_bol |> on_focused_buffer_or_new
   | _ -> noop
 
-let handle_next_command2 m e =
+let handle_next_command m e =
   match m with
   | Insert -> (
       match Sequence.next e.i_pending with
@@ -266,6 +266,6 @@ let handle_next_command2 m e =
       | None -> ((), e)
       | Some (h, t) -> handle_normal_command h { e with n_pending = t })
 
-let handle_next_command2 =
+let handle_next_command =
   let open Action in
-  get_mode >>= handle_next_command2
+  get_mode >>= handle_next_command
-- 
cgit v1.2.3