mirror of
https://github.com/penpot/penpot.git
synced 2026-02-12 22:53:02 +00:00
🐛 Fix paste shapes into layout
This commit is contained in:
@@ -55,6 +55,7 @@
|
||||
[app.main.data.workspace.selection :as dws]
|
||||
[app.main.data.workspace.shapes :as dwsh]
|
||||
[app.main.data.workspace.shapes-update-layout :as dwul]
|
||||
[app.main.data.workspace.shapes-update-layout :as dwul]
|
||||
[app.main.data.workspace.state-helpers :as wsh]
|
||||
[app.main.data.workspace.thumbnails :as dwth]
|
||||
[app.main.data.workspace.transforms :as dwt]
|
||||
@@ -1441,7 +1442,8 @@
|
||||
(into (d/ordered-set)))]
|
||||
|
||||
(rx/of (dch/commit-changes changes)
|
||||
(dws/select-shapes selected))))]
|
||||
(dws/select-shapes selected)
|
||||
(dwul/update-layout-positions [frame-id]))))]
|
||||
|
||||
(ptk/reify ::paste-shape
|
||||
ptk/WatchEvent
|
||||
|
||||
@@ -358,11 +358,9 @@
|
||||
(gpt/subtract (gpt/point (:selrect new-shape))
|
||||
(gpt/point (:selrect shape)))
|
||||
|
||||
|
||||
new-shape
|
||||
(update new-shape :position-data gsh/move-position-data (:x delta-move) (:y delta-move))]
|
||||
|
||||
|
||||
new-shape))
|
||||
|
||||
(defn update-text-modifier
|
||||
|
||||
Reference in New Issue
Block a user