El 12/8/07 3:02 AM, "Keith Hodges" keith_hodges@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