Chris Muller uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-bp.416.mcz==================== Summary ====================
Name: Monticello-bp.416
Author: bp
Time: 7 January 2011, 10:51:28.009 pm
UUID: 176c0d57-4da3-44ab-a30c-ed1b1eeae3c0
Ancestors: Monticello-ar.415
- move flushObsolotePackageInfos and cleanUp: from MCPackageManager to its subclass MCWorkingCopy to avoid losing all PackageInfos during aggressive clean up
=============== Diff against Monticello-ar.415 ===============
Item was removed:
- ----- Method: MCPackageManager class>>cleanUp: (in category 'class initialization') -----
- cleanUp: aggressive
- "Remove all PackageInfos that are not associated with an MCPackageManager when aggressively cleaning up"
-
- aggressive ifTrue: [self flushObsoletePackageInfos]!
Item was removed:
- ----- Method: MCPackageManager class>>flushObsoletePackageInfos (in category 'cleanup') -----
- flushObsoletePackageInfos
- "Flush any and all PackageInfos that are not associated with an MCPackageManager."
-
- | pkgNames |
- pkgNames := self allManagers collect:[:wcs| wcs packageName] as: Set.
- PackageOrganizer default flushObsoletePackages:[:p|
- p class isObsolete or:[(pkgNames includes: p packageName) not].
- ].!
Item was added:
+ ----- Method: MCWorkingCopy class>>cleanUp: (in category 'class initialization') -----
+ cleanUp: aggressive
+ "Remove all PackageInfos that are not associated with an MCWorkingCopy when aggressively cleaning up"
+
+ aggressive ifTrue: [self flushObsoletePackageInfos]!
Item was added:
+ ----- Method: MCWorkingCopy class>>flushObsoletePackageInfos (in category 'cleanup') -----
+ flushObsoletePackageInfos
+ "Flush any and all PackageInfos that are not associated with an MCWorkingCopy."
+
+ | pkgNames |
+ pkgNames := self allManagers collect:[:wcs| wcs packageName] as: Set.
+ PackageOrganizer default flushObsoletePackages:[:p|
+ p class isObsolete or:[(pkgNames includes: p packageName) not].
+ ].!