mirror of
https://github.com/penpot/penpot.git
synced 2025-01-23 23:18:48 -05:00
🐛 Fixes recursion problems when creating component
This commit is contained in:
parent
d85537fa7b
commit
d66452423f
1 changed files with 2 additions and 1 deletions
|
@ -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…
Add table
Reference in a new issue