mirror of
https://github.com/penpot/penpot.git
synced 2025-03-18 18:51:29 -05:00
Fix rules with zoom (#4)
This commit is contained in:
parent
3a448e33e4
commit
18ddbaa039
1 changed files with 4 additions and 4 deletions
|
@ -33,7 +33,7 @@
|
|||
[zoom acc value]
|
||||
(let [big-ticks-mod (big-ticks-mod zoom)
|
||||
mid-ticks-mod (mid-ticks-mod zoom)
|
||||
pos (+ value
|
||||
pos (+ (* value zoom)
|
||||
rule-padding
|
||||
(* wb/canvas-start-x zoom)
|
||||
wb/canvas-scroll-padding)]
|
||||
|
@ -51,7 +51,7 @@
|
|||
[zoom acc value]
|
||||
(let [big-ticks-mod (big-ticks-mod zoom)
|
||||
mid-ticks-mod (mid-ticks-mod zoom)
|
||||
pos (+ value
|
||||
pos (+ (* value zoom)
|
||||
(* wb/canvas-start-x zoom)
|
||||
wb/canvas-scroll-padding)]
|
||||
(cond
|
||||
|
@ -69,7 +69,7 @@
|
|||
(defn- horizontal-text-label
|
||||
[zoom value]
|
||||
(let [big-ticks-mod (big-ticks-mod zoom)
|
||||
pos (+ value
|
||||
pos (+ (* value zoom)
|
||||
rule-padding
|
||||
(* wb/canvas-start-x zoom)
|
||||
wb/canvas-scroll-padding)]
|
||||
|
@ -87,7 +87,7 @@
|
|||
(defn- vertical-text-label
|
||||
[zoom value]
|
||||
(let [big-ticks-mod (big-ticks-mod zoom)
|
||||
pos (+ value
|
||||
pos (+ (* value zoom)
|
||||
(* wb/canvas-start-x zoom)
|
||||
;; wb/canvas-start-x
|
||||
wb/canvas-scroll-padding)]
|
||||
|
|
Loading…
Add table
Reference in a new issue