Deleting a variant proxy deletes original

hpi-swa · Jan 10, 2024 · 554e14e · 554e14e
1 parent 4be7836
commit 554e14e
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/packages/Sandblocks-Smalltalk/SBVariantProxy.class.st b/packages/Sandblocks-Smalltalk/SBVariantProxy.class.st
@@ -101,6 +101,8 @@ SBVariantProxy >> updateOriginalWithOwnValues [
 	variantThatNeedsChanging ifNil: [self delete. ^ self].
 
 	original replaceBy: (original := self firstSubmorph copyBlock).
+	original isVariant ifFalse: [self delete. ^ self].
+
 	variantThatNeedsChanging replaceValuesFrom: original copyBlock.
 	self sandblockEditor markChanged: self containedMethod
 ]