From: Amélia Coutard-Sander Date: Sun, 5 Jan 2025 00:50:12 +0000 (+0100) Subject: 0 renvoie à l'origine X-Git-Url: https://git.ameliathe1st.gay/?a=commitdiff_plain;h=882c7de4dcf51ef5e06454baea8f684de27dff57;p=cells.git 0 renvoie à l'origine --- diff --git a/bin/modes.ml b/bin/modes.ml index c3bdf96..a0c47ee 100644 --- a/bin/modes.ml +++ b/bin/modes.ml @@ -244,6 +244,7 @@ and Normal : (Mode with type initer = unit) = struct in function | ':' -> (EditorState (m, st), Either.right (ModeAux.ModeAndState ((module Command), Command.initial ""))) + | '0' when n.n = None -> (EditorState (m, { st with pos = (0, 0) }), Either.left n) | c when '0' <= c && c <= '9' -> (EditorState (m, st), Either.left (chnum (int_of_char c - int_of_char '0') n)) | 's' -> (EditorState (m, set_current st), Either.left { n = None })