(defn ex0-key-events [prevent-default?] (->> (events js/window "keydown" prevent-default?) (map key-event->keycode) (filter KEYS) (map key->keyword)))
(Sorry, I haven't yet used ClojureScript, only Clojure. Googling didn't help.)
(defn events [object type] (let [out (chan)] (.addEventListener object type (fn [e] (put! out e))) out))
(Sorry, I haven't yet used ClojureScript, only Clojure. Googling didn't help.)