3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-26 12:17:22 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Add fixed position in viewer

Browse source
This commit is contained in:
Andrés Moya 2022-03-30 15:31:42 +02:00 • committed by Eva
parent c9937f6b91
commit b68fdee946
10 changed files with 172 additions and 125 deletions
Download patch file Download diff file Expand all files Collapse all files

10
frontend/src/app/util/dom.cljs
View file

@ -127,8 +127,18 @@
(when (some? node)
(.getAttribute ^js node attr-name)))
(defn get-scroll-position
[^js event]
(when (some? event)
{:scroll-height (.-scrollHeight event)
:scroll-left (.-scrollLeft event)
:scroll-top (.-scrollTop event)
:scroll-width (.-scrollWidth event)}))
(def get-target-val (comp get-value get-target))
(def get-target-scroll (comp get-scroll-position get-target))
(defn click
"Click a node"
[^js node]