github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-05-05 08:08:27 +00:00
Code Issues Packages Projects Releases Wiki Activity

wip

Browse Source
This commit is contained in:
Pablo Alba 2025-10-28 13:24:45 +01:00
parent f64105ad08
commit a4ca140385
1 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
frontend/src/app/main/data/workspace/libraries.cljs
View File

@ -1018,12 +1018,19 @@
(clv/generate-keep-touched changes new-shape shape orig-shapes page libraries ldata)
[changes []])
update-layout-ids (concat all-parents parents-of-swapped new-children-ids)]
(rx/of
(dwu/start-undo-transaction undo-id)
(dch/commit-changes changes)
(ptk/data-event :layout/update {:ids update-layout-ids :undo-group undo-group})
(dwu/commit-undo-transaction undo-id)
(dws/select-shape (:id new-shape) false))))))
(rx/concat
(rx/of
(dwu/start-undo-transaction undo-id)
(dch/commit-changes changes)
(ptk/data-event :layout/update {:ids update-layout-ids :undo-group undo-group}))
;; NOTE: we need to schedule a commit into a
;; microtask for ensure that all the scheduled
;; microtask of previous events execute before the
;; commit (specifically the layout/update)
(->> (rx/of (dwu/commit-undo-transaction undo-id)
(dws/select-shape (:id new-shape) false))
(rx/observe-on :async)
(rx/delay 1000)))))))
(defn component-multi-swap
"Swaps several components with another one"