The Trunk: ReleaseBuilder-mt.186.mcz

Marcel Taeumel uploaded a new version of ReleaseBuilder to project The Trunk:
http://source.squeak.org/trunk/ReleaseBuilder-mt.186.mcz

==================== Summary ====================

Name: ReleaseBuilder-mt.186
Author: mt
Time: 28 May 2018, 8:41:06.53437 am
UUID: 96b49797-c0c1-bd41-adb7-eb3beb3a55b6
Ancestors: ReleaseBuilder-mt.185

Be more precise and only clean-up uni-class-hickups in environments.

=============== Diff against ReleaseBuilder-mt.185 ===============

Item was changed:
  ----- Method: ReleaseBuilder class>>discardUserObjects (in category 'scripts - support') -----
  discardUserObjects
 
  "Remove the classes."
  Player removeUninstantiatedSubclassesSilently.
  MorphicModel removeUninstantiatedSubclassesSilently.
 
  "Clean-up environment hick-ups."
  Environment default allClassesDo: [:cls |
+ (cls isUniClass and: [cls environment ~~ Environment default])
- cls environment ~~ Environment default
  ifTrue: [Environment default forgetClass: cls logged: false]].
  Environment default declarations
+ select: [:binding | (binding value isBehavior and: [binding value isUniClass]) and: [binding value isObsolete]]
+ thenDo: [:binding |
+ SystemOrganization removeElement: binding key.
+ Environment default removeKey: binding key].
- select: [:ea | (ea value isBehavior and: [ea value isUniClass]) and: [ea value isObsolete]]
- thenDo: [:ea |
- SystemOrganization removeElement: ea key.
- Environment default removeKey: ea key].
 
  "Remove empty categories for user objects."
  SystemOrganizer cleanUp: true.!