The Trunk: Monticello-ar.362.mcz

Andreas Raab uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-ar.362.mcz

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

Name: Monticello-ar.362
Author: ar
Time: 6 February 2010, 11:36:01.659 am
UUID: 7bb8ca1c-32a8-7c47-8ee1-57063f0be03c
Ancestors: Monticello-nice.361

Suppress interactive warnings from ClassBuilder while installing MC packages automatically.

=============== Diff against Monticello-nice.361 ===============

Item was changed:
  ----- Method: MCClassDefinition>>createClass (in category 'installing') -----
  createClass
  | superClass class composition |
  superClass := Smalltalk at: superclassName.
+ [class := (ClassBuilder new)
- class := (ClassBuilder new)
  name: name
  inEnvironment: superClass environment
  subclassOf: superClass
  type: type
  instanceVariableNames: self instanceVariablesString
  classVariableNames: self classVariablesString
  poolDictionaries: self sharedPoolsString
+ category: category] on: Warning do:[:ex| ex resume].
- category: category.
 
  "The following is written to support traits unloading"
  composition := Compiler evaluate: (self traitComposition ifNil:['{}']).
  (composition isEmpty and:[class traitComposition isEmpty]) ifFalse:[
  class setTraitComposition: composition asTraitComposition.
  ].
 
  composition := Compiler evaluate: (self classTraitComposition ifNil:['{}']).
  (composition isEmpty and:[class class traitComposition isEmpty]) ifFalse:[
  class class setTraitComposition: composition asTraitComposition.
  ].
 
  ^class!