Module Modal.Mode
module KeyTrie : sig ... end
type name
= Name.t
type action
= Mew__Mode.Make(Key)(Name).action
=
|
Switch of name
|
Key of Key.t
|
KeySeq of Key.t Stdlib.Queue.t
|
Custom of unit -> unit
type t
= Mew__Mode.Make(Key)(Name).t
=
{
name : name;
timeout : float option;
bindings : action KeyTrie.node;
}
module Modes : sig ... end
val name : t -> name
val timeout : t -> float option
val bindings : t -> action KeyTrie.node
val compare : t -> t -> int
val default_mode : 'a Modes.t -> Modes.key * 'a
val bind : t -> KeyTrie.path -> action -> unit
val unbind : t -> KeyTrie.path -> unit