🐛 Fix swap slots when detaching a copy with subcopies

This commit is contained in:
Andrés Moya 2024-06-11 17:14:28 +02:00
parent 058a72b817
commit 03aa0817f7
4 changed files with 37 additions and 17 deletions

View file

@ -184,10 +184,7 @@
(ctk/instance-head? child))
(let [slot (guess-swap-slot component-child component-container)]
(l/dbg :hint "child" :id (:id child) :name (:name child) :slot slot)
(ctn/update-shape container (:id child)
#(update % :touched
cfh/set-touched-group
(ctk/build-swap-slot-group slot))))
(ctn/update-shape container (:id child) #(ctk/set-swap-slot % slot)))
container)]
(recur (process-copy-head container child)
(rest children)