mirror of
https://github.com/penpot/penpot.git
synced 2026-05-14 12:34:10 +00:00
10 lines
155 B
Clojure
10 lines
155 B
Clojure
(ns uxbox.ui.keyboard)
|
|
|
|
(defn is-keycode?
|
|
[keycode]
|
|
(fn [e]
|
|
(= (.-keyCode e) keycode)))
|
|
|
|
(def esc? (is-keycode? 27))
|
|
(def enter? (is-keycode? 13))
|