mirror of
https://github.com/penpot/penpot.git
synced 2025-01-09 00:10:11 -05:00
13 lines
176 B
Clojure
13 lines
176 B
Clojure
(ns uxbox.ui.dom)
|
|
|
|
(defn stop-propagation
|
|
[e]
|
|
(.stopPropagation e))
|
|
|
|
(defn prevent-default
|
|
[e]
|
|
(.preventDefault e))
|
|
|
|
(defn event->value
|
|
[e]
|
|
(.-value (.-target e)))
|