annotate waitbox.urs @ 7:48a4180171b0

Shifted some more generic theme navigation code to the library. Also generalized formatting options a bit for popupNav.
author Karn Kallio <kkallio@eka>
date Fri, 06 May 2011 23:00:22 -0430
parents 37eefd0a2ed4
children
rev   line source
adam@0 1 (** Textboxes with an event for "no change in N milliseconds" *)
adam@0 2
adam@0 3 type t
adam@0 4
adam@0 5 val create : int -> transaction t
adam@0 6
adam@0 7 val setAction : t -> (string -> transaction {}) -> transaction {}
adam@0 8
adam@0 9 val render : t -> xbody
adam@0 10
adam@0 11 val clear : t -> transaction {}
adam@0 12
adam@0 13 val tickle : t -> transaction {}
adam@0 14 (* Simulate the effect of the user making a change, which restarts the timer. *)
adam@0 15
adam@0 16 val trigger : t -> transaction {}
adam@0 17 (* Like [tickle], but triggering the action immediately, without waiting for
adam@0 18 * quiescence *)