diff options
Diffstat (limited to 'lib/editor.ml')
-rw-r--r-- | lib/editor.ml | 6 |
1 files changed, 3 insertions, 3 deletions
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 = | |||
255 | Buffer.Action.delete_to_bol |> on_focused_buffer_or_new | 255 | Buffer.Action.delete_to_bol |> on_focused_buffer_or_new |
256 | | _ -> noop | 256 | | _ -> noop |
257 | 257 | ||
258 | let handle_next_command2 m e = | 258 | let handle_next_command m e = |
259 | match m with | 259 | match m with |
260 | | Insert -> ( | 260 | | Insert -> ( |
261 | match Sequence.next e.i_pending with | 261 | match Sequence.next e.i_pending with |
@@ -266,6 +266,6 @@ let handle_next_command2 m e = | |||
266 | | None -> ((), e) | 266 | | None -> ((), e) |
267 | | Some (h, t) -> handle_normal_command h { e with n_pending = t }) | 267 | | Some (h, t) -> handle_normal_command h { e with n_pending = t }) |
268 | 268 | ||
269 | let handle_next_command2 = | 269 | let handle_next_command = |
270 | let open Action in | 270 | let open Action in |
271 | get_mode >>= handle_next_command2 | 271 | get_mode >>= handle_next_command |