github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-04-29 05:08:08 +00:00
Code Issues Packages Projects Releases 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
Show Stats 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]
[beicon.core :as rx]
[cuerdas.core :as str]
[uxbox.util.geom.point :as gpt]
[uxbox.util.blob :as blob]))
;; --- Deprecated methods
@ -135,4 +136,14 @@
[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)))