github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-04-26 11:48:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Fix streaming of panning events

Browse Source
This commit is contained in:
Alejandro Alonso 2024-11-18 10:06:27 +01:00
parent defe6ff7f8
commit b03df6422f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
frontend/src/app/main/data/workspace/viewport.cljs
View File

@ -157,6 +157,8 @@
(rx/filter mse/pointer-event?)
(rx/filter #(= :delta (:source %)))
(rx/take-until stopper)
;; Some events are executed in synchronous way like panning with backspace pressed
(rx/observe-on :af)
(rx/map (fn [event]
(let [delta (dm/get-prop event :pt)]
(update-viewport-position {:x #(- % (/ (:x delta) zoom))