mirror of
https://github.com/penpot/penpot.git
synced 2025-01-10 00:40:30 -05:00
Emit point instances on scroll stream.
This commit is contained in:
parent
547c2335ef
commit
5e732a4d20
1 changed files with 2 additions and 1 deletions
|
@ -6,6 +6,7 @@
|
||||||
[uxbox.rstore :as rs]
|
[uxbox.rstore :as rs]
|
||||||
[uxbox.state :as st]
|
[uxbox.state :as st]
|
||||||
[uxbox.data.workspace :as dw]
|
[uxbox.data.workspace :as dw]
|
||||||
|
[uxbox.util.geom.point :as gpt]
|
||||||
[uxbox.util.data :refer (classnames)]
|
[uxbox.util.data :refer (classnames)]
|
||||||
[uxbox.ui.icons :as i]
|
[uxbox.ui.icons :as i]
|
||||||
[uxbox.ui.mixins :as mx]
|
[uxbox.ui.mixins :as mx]
|
||||||
|
@ -48,7 +49,7 @@
|
||||||
(let [target (.-target event)
|
(let [target (.-target event)
|
||||||
top (.-scrollTop target)
|
top (.-scrollTop target)
|
||||||
left (.-scrollLeft target)]
|
left (.-scrollLeft target)]
|
||||||
(rx/push! wb/scroll-b {:top top :left left})))
|
(rx/push! wb/scroll-b (gpt/point left top))))
|
||||||
|
|
||||||
(defn- workspace-render
|
(defn- workspace-render
|
||||||
[own projectid]
|
[own projectid]
|
||||||
|
|
Loading…
Reference in a new issue