'From Squeak3.3alpha of 12 January 2002 [latest update: #4780] on 27 February 2002 at 2:59:28 pm'! "Change Set: projLoadPatches-sw Date: 27 February 2002 Author: Scott Wallace Two workarounds relating to problems encountered in loading projects that may engender naming conflicts"! !Object methodsFor: 'testing' stamp: 'sw 2/27/2002 14:55'! renameTo: newName "If the receiver has an inherent idea about its own name, it should take action here. Any object that might be pointed to in the References dictionary might get this message sent to it upon reload"! ! !MorphicModel class methodsFor: 'queries' stamp: 'sw 2/27/2002 14:58'! baseUniclass "Answer the uniclass that new instances should be instances of. This protocol is primarily intended for the Player lineage, but can get sent to a MorphicModel subclass when the project-loading mechanism is scrambling to fix up projects that have naming conflicts with the project being loaded." | curr | curr _ self. [curr theNonMetaClass superclass name endsWithDigit] whileTrue: [curr _ curr superclass]. ^ curr "PlayWithMe1 baseUniclass"! !