'From Squeak3.1alpha of 28 February 2001 [latest update: #3995] on 8 May 2001 at 11:52:24 pm'! "Change Set: WnldHaloFix-ar Date: 8 May 2001 Author: Andreas Raab Make sure we loose all wrappers if the halo goes away."! !WonderlandWrapperMorph methodsFor: 'accessing' stamp: 'ar 5/8/2001 23:51'! hasHalo: aBool super hasHalo: aBool. aBool ifFalse:[ (self hasProperty: #surviveHaloLoss) ifFalse:[ "Need to get rid of wrappers on top of us, so..." owner ifNotNil:[owner hasHalo: owner hasHalo]. self delete]. self removeProperty: #surviveHaloLoss]. ! !