type t = unit -> User_message.Style.t Pp.t option
Function that produces the current status line
val set : t -> unit
Change the status line generator
val set_temporarily : t -> (unit -> 'a) -> 'a
Console.Status_line
type t = unit -> User_message.Style.t Pp.t option
Function that produces the current status line
val set : t -> unit
Change the status line generator
val set_temporarily : t -> (unit -> 'a) -> 'a