🐛 Fixes issues with horizontal scroll with trackpad

This commit is contained in:
alonso.torres 2021-01-14 11:48:32 +01:00
parent 356572c21b
commit 3b6c9f9511
4 changed files with 25 additions and 14 deletions

View file

@ -215,8 +215,9 @@
(fn [event]
(when (kbd/ctrl? event)
(dom/prevent-default event)
(let [event (.getBrowserEvent ^js event)]
(if (pos? (.-deltaY ^js event))
(let [event (.getBrowserEvent ^js event)
delta (+ (.-deltaY ^js event) (.-deltaX ^js event))]
(if (pos? delta)
(st/emit! dv/decrease-zoom)
(st/emit! dv/increase-zoom)))))