github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-25 13:26:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix wrong behavior on canvas position translation.

Browse Source 
The translation was not aware of bounding rect size
increment when shapes are out of main drawing zone.
This commit is contained in:
Andrey Antukh 2016-02-19 22:33:10 +02:00
parent e104386398
commit 6226c7f93b
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/uxbox/ui/workspace/canvas.cljs
View File

@ -188,9 +188,12 @@
(let [viewport (mx/get-ref-dom own "viewport")] (let [viewport (mx/get-ref-dom own "viewport")]
(when-let [canvas (dom/get-element-by-class "page-canvas" viewport)] (when-let [canvas (dom/get-element-by-class "page-canvas" viewport)]
(let [brect (.getBoundingClientRect canvas) (let [brect (.getBoundingClientRect canvas)
bbox (.getBBox canvas)
brect (gpt/point (parse-int (.-left brect)) brect (gpt/point (parse-int (.-left brect))
(parse-int (.-top brect)))] (parse-int (.-top brect)))
(gpt/subtract pt brect))))) bbox (gpt/point (.-x bbox) (.-y bbox))]
(-> (gpt/add pt bbox)
(gpt/subtract brect))))))
(on-key-down [event] (on-key-down [event]
(when (kbd/space? event) (when (kbd/space? event)