A new version of SystemEditor was added to project SystemEditor: http://www.squeaksource.com/SystemEditor/SystemEditor-mtf.153.mcz
==================== Summary ====================
Name: SystemEditor-mtf.153 Author: mtf Time: 6 November 2008, 10:43:34 pm UUID: f3345e04-42e6-4c3c-bded-65b050d94b47 Ancestors: SystemEditor-mtf.152
While searching for subclasses of a ClassEditor, restrict the search to ClassEditors, not traits
=============== Diff against SystemEditor-mtf.152 ===============
Item was changed: ----- Method: SystemEditor>>edSubclassesOrEditorsOf:do: (in category 'building') ----- edSubclassesOrEditorsOf: anEditor do: aBlock "Evaluate aBlock for each subclasses of the given ClassEditor, as either an editor (if it has changed), or as a class (if it has not changed). Does not add any items to my additions list"
| subclasses | subclasses := anEditor subject ifNil: [Set new] ifNotNilDo: [ :class | class subclasses asSet]. additions do: [ :ea | subclasses remove: ea subject ifAbsent: []. + ((ea isKindOf: ClassDescriptionEditor) + and: [ea superclassOrEditor == anEditor]) + ifTrue: [aBlock value: ea]]. - ea superclassOrEditor == anEditor ifTrue: [aBlock value: ea]]. removals do: [ :removedKey | subclasses remove: (subject at: removedKey) ifAbsent: []]. subclasses do: aBlock!
packages@lists.squeakfoundation.org