[Newbies] Obsolete classes - I can find pointers to them, but
how to get rid of them
Edgar J. De Cleene
edgardec2001 at yahoo.com.ar
Sat Dec 8 09:22:15 UTC 2007
El 12/8/07 3:02 AM, "Keith Hodges" <keith_hodges at yahoo.co.uk> escribió:
> fixAllObsoleteReferences
> "
> self fixAllObsoleteReferences
> "
> (SystemNavigation default obsoleteBehaviors select: [ :c | c isMeta not ])
> do: [ :obsClass |
>
> ([obsClass nonObsoleteClass] ifError: [ nil]) ifNotNilDo:
> [ :actualClass |
>
> actualClass updateInstancesFrom: obsClass.
> obsClass becomeForward: actualClass.
>
> ([obsClass metaclass] ifError:[nil]) ifNotNilDo:
> [:metaClass |
> metaClass becomeForward: actualClass class ]]].
>
> SmalltalkImage current fixObsoleteReferences
Keith, made a Mantis report with this and could go into 3.10.
Also any related to image cleanup.
Edgar
More information about the Beginners
mailing list