mirror of
https://github.com/penpot/penpot.git
synced 2025-01-23 23:18:48 -05:00
🐛 Fix paste shapes into layout
This commit is contained in:
parent
2a46989ec9
commit
7ffdf21657
2 changed files with 3 additions and 3 deletions
|
@ -55,6 +55,7 @@
|
||||||
[app.main.data.workspace.selection :as dws]
|
[app.main.data.workspace.selection :as dws]
|
||||||
[app.main.data.workspace.shapes :as dwsh]
|
[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.shapes-update-layout :as dwul]
|
||||||
[app.main.data.workspace.state-helpers :as wsh]
|
[app.main.data.workspace.state-helpers :as wsh]
|
||||||
[app.main.data.workspace.thumbnails :as dwth]
|
[app.main.data.workspace.thumbnails :as dwth]
|
||||||
[app.main.data.workspace.transforms :as dwt]
|
[app.main.data.workspace.transforms :as dwt]
|
||||||
|
@ -1441,7 +1442,8 @@
|
||||||
(into (d/ordered-set)))]
|
(into (d/ordered-set)))]
|
||||||
|
|
||||||
(rx/of (dch/commit-changes changes)
|
(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/reify ::paste-shape
|
||||||
ptk/WatchEvent
|
ptk/WatchEvent
|
||||||
|
|
|
@ -358,11 +358,9 @@
|
||||||
(gpt/subtract (gpt/point (:selrect new-shape))
|
(gpt/subtract (gpt/point (:selrect new-shape))
|
||||||
(gpt/point (:selrect shape)))
|
(gpt/point (:selrect shape)))
|
||||||
|
|
||||||
|
|
||||||
new-shape
|
new-shape
|
||||||
(update new-shape :position-data gsh/move-position-data (:x delta-move) (:y delta-move))]
|
(update new-shape :position-data gsh/move-position-data (:x delta-move) (:y delta-move))]
|
||||||
|
|
||||||
|
|
||||||
new-shape))
|
new-shape))
|
||||||
|
|
||||||
(defn update-text-modifier
|
(defn update-text-modifier
|
||||||
|
|
Loading…
Add table
Reference in a new issue