[davidbalbert]

My JavaScript isn't great, so I'm ignoring prevent-default?, but you can probably do something like this:

  (defn events [object type]
    (let [out (chan)]
      (.addEventListener object type (fn [e] (put! out e)))
      out))