view waitbox.urs @ 15:8300d5f0dc19

Replace ChangePoller with SourceL, plus some other rearrangements
author Adam Chlipala <adam@chlipala.net>
date Sun, 07 Aug 2011 14:38:52 -0400
parents 37eefd0a2ed4
children
line wrap: on
line source
(** Textboxes with an event for "no change in N milliseconds" *)

type t

val create : int -> transaction t

val setAction : t -> (string -> transaction {}) -> transaction {}

val render : t -> xbody

val clear : t -> transaction {}

val tickle : t -> transaction {}
(* Simulate the effect of the user making a change, which restarts the timer. *)

val trigger : t -> transaction {}
(* Like [tickle], but triggering the action immediately, without waiting for
 * quiescence *)