sig
  type t
  type filter = string -> bool
  val triggers : Bogue.Trigger.t list
  val uint_filter : Bogue.Text_input.filter
  val text : Bogue.Text_input.t -> string
  val activate : Bogue.Text_input.t -> unit
end