El 12/8/07 3:02 AM, "Keith Hodges" <[EMAIL PROTECTED]> 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
_______________________________________________
Beginners mailing list
Beginners@lists.squeakfoundation.org
http://lists.squeakfoundation.org/mailman/listinfo/beginners
