mirror of
https://github.com/penpot/penpot.git
synced 2026-09-07 04:29:31 +00:00
🐛 Fixes recursion problems when creating component
This commit is contained in:
parent
d85537fa7b
commit
d66452423f
@ -230,7 +230,8 @@
|
|||||||
(let [file-id (:current-file-id state)
|
(let [file-id (:current-file-id state)
|
||||||
page-id (:current-page-id state)
|
page-id (:current-page-id state)
|
||||||
objects (dwc/lookup-page-objects state page-id)
|
objects (dwc/lookup-page-objects state page-id)
|
||||||
selected (get-in state [:workspace-local :selected])]
|
selected (get-in state [:workspace-local :selected])
|
||||||
|
selected (cp/clean-loops objects selected)]
|
||||||
(let [[group rchanges uchanges]
|
(let [[group rchanges uchanges]
|
||||||
(dwlh/generate-add-component selected objects page-id file-id)]
|
(dwlh/generate-add-component selected objects page-id file-id)]
|
||||||
(when-not (empty? rchanges)
|
(when-not (empty? rchanges)
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user