The Trunk: Tools-mt.590.mcz

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

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

Name: Tools-mt.590
Author: mt
Time: 14 April 2015, 1:50:02.932 pm
UUID: 79c52b3c-791b-e94f-bc09-a230ca57bf5c
Ancestors: Tools-mt.589

Use PseudoClass-compatible protocol to access meta-class.

=============== Diff against Tools-mt.589 ===============

Item was changed:
  ----- Method: Browser>>didCodeChangeElsewhere (in category 'self-updating') -----
  didCodeChangeElsewhere
 
  ^ super didCodeChangeElsewhere or: [self classDefinitionIndicated
  and: [self metaClassIndicated
  ifFalse: [classDefinition ~= self selectedClass definition]
+ ifTrue: [metaClassDefinition ~= self selectedClass theMetaClass definition]]]!
- ifTrue: [metaClassDefinition ~= self selectedClass classSide definition]]]!

Item was changed:
  ----- Method: Browser>>setClassDefinition (in category 'metaclass') -----
  setClassDefinition
  "Remember the current class definition."
 
  | theClass |
  classDefinition := nil.
  metaClassDefinition := nil.
  self hasClassSelected ifFalse: [^ self].
  theClass := self selectedClass ifNil: [ ^self ].
  classDefinition := theClass definition.
+ metaClassDefinition := theClass theMetaClass definition.!
- metaClassDefinition := theClass classSide definition.!