(* Event listeners *)

let on_click f = H.EventAttr ("click", f)

let on_input f = H.EventAttr ("input", f)

let on_submit f = H.EventAttr ("submit", f)

let on_blur f = H.EventAttr ("blur", f)

let on_change f = H.EventAttr ("change", f)

let on_focus f = H.EventAttr ("focus", f)