3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-11 05:16:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Add many helpers to uxbox.util.dom ns.

Browse source
This commit is contained in:
Andrey Antukh 2020-03-19 17:39:53 +01:00 • committed by Alonso Torres
parent 9d8dffa80b
commit 1434cb62f5
1 changed files with 11 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

11
frontend/src/uxbox/util/dom.cljs
View file

@ -14,6 +14,7 @@
[cuerdas.core :as str] [cuerdas.core :as str]
[beicon.core :as rx] [beicon.core :as rx]
[cuerdas.core :as str] [cuerdas.core :as str]
[uxbox.util.geom.point :as gpt]
[uxbox.util.blob :as blob])) [uxbox.util.blob :as blob]))
;; --- Deprecated methods ;; --- Deprecated methods
@ -135,4 +136,14 @@
[el query] [el query]
(.querySelector el query)) (.querySelector el query))
(defn get-client-position
[event]
(let [x (.-clientX event)
y (.-clientY event)]
(gpt/point x y)))
(defn get-offset-position
[event]
(let [x (.-offsetX event)
y (.-offsetY event)]
(gpt/point x y)))