Merge pull request #2754 from penpot/superalex-fix-move-boards-with-comments

🐛 Fix move boards with comments
This commit is contained in:
Aitor 2023-01-11 10:28:04 +01:00 committed by GitHub
commit 74e4273549
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -162,7 +162,7 @@
build-move-event build-move-event
(fn [comment-thread] (fn [comment-thread]
(let [frame (get objects (:frame-id comment-thread)) (let [frame (get objects (:frame-id comment-thread))
modifiers (get object-modifiers (:frame-id comment-thread)) modifiers (get-in object-modifiers [(:frame-id comment-thread) :modifiers])
frame' (gsh/transform-shape frame modifiers) frame' (gsh/transform-shape frame modifiers)
moved (gpt/to-vec (gpt/point (:x frame) (:y frame)) moved (gpt/to-vec (gpt/point (:x frame) (:y frame))
(gpt/point (:x frame') (:y frame'))) (gpt/point (:x frame') (:y frame')))