From: Amélia Coutard-Sander Date: Wed, 7 Jan 2026 13:38:53 +0000 (+0100) Subject: 0 renvoie à l'origine X-Git-Url: https://git.f4mnq.fr/?a=commitdiff_plain;h=2a17f068893111f3d74527205d598231dd44c218;p=cells.git 0 renvoie à l'origine --- diff --git a/bin/modes.ml b/bin/modes.ml index c9222b3..56cf236 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 })