(defn
add-event-listeners!
[content events-chan opts]
(doto
content
(events/removeAll)
(events/listen
"keydown"
(fn
[e]
(when (prevent-default? e opts) (.preventDefault e))
(put! events-chan e)))
(events/listen
"keyup"
(fn* [p1__18521#] (put! events-chan p1__18521#)))
(events/listen
"cut"
(fn* [p1__18522#] (put! events-chan p1__18522#)))
(events/listen
"paste"
(fn* [p1__18523#] (put! events-chan p1__18523#)))
(events/listen
"mouseup"
(fn* [p1__18524#] (put! events-chan p1__18524#)))))