@@ -75,10 +75,14 @@ checkbox b =
7575 let cbs = checkboxes b
7676 in (lift (cbs.checkbox id) cbs.events, cbs.events)
7777
78+-- Detect when the mouse is hovering over some elements. This
79+-- allows you to create and destroy elements dynamically and still
80+-- detect hover information.
7881hoverables : a -> { events : Signal a,
7982 hoverable : (Bool -> a) -> Element -> Element }
8083hoverables = Native.Graphics.Input.hoverables
8184
85+-- Detect when the mouse is hovering over a specifici `Element`.
8286hoverable : Element -> (Element, Signal Bool)
8387hoverable elem =
8488 let pool = hoverables False