type t = unit -> User_message.Style.t Pp.t optionFunction that produces the current status line
val set : t -> unitChange the status line generator
val set_temporarily : t -> (unit -> 'a) -> 'aConsole.Status_linetype t = unit -> User_message.Style.t Pp.t optionFunction that produces the current status line
val set : t -> unitChange the status line generator
val set_temporarily : t -> (unit -> 'a) -> 'a