[Pkg] The Trunk: Tools-cmm.357.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Jun 4 22:09:26 UTC 2011


Chris Muller uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-cmm.357.mcz

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

Name: Tools-cmm.357
Author: cmm
Time: 4 June 2011, 5:08:48.648 pm
UUID: 08000000-1508-5e1f-1508-5e1f14000000
Ancestors: Tools-cmm.355, Tools-ul.356

- Fixed problem where MessageSets were not keeping the autoSelectString selected when 'remove from this browser' was invoked.
- Merged Tools-cmm.355.

=============== Diff against Tools-ul.356 ===============

Item was changed:
  ----- Method: HierarchyBrowser>>initHierarchyForClass: (in category 'initialization') -----
  initHierarchyForClass: aClassOrMetaClass 
  	| nonMetaClass superclasses |
  	centralClass := aClassOrMetaClass.
  	nonMetaClass := aClassOrMetaClass theNonMetaClass.
  	self systemOrganizer: SystemOrganization.
  	metaClassIndicated := aClassOrMetaClass isMeta.
  	classDisplayList := OrderedCollection new.
  	(superclasses := nonMetaClass allSuperclasses reversed) withIndexDo:
  		[ : each : indent | classDisplayList add:
  			(String streamContents:
  				[ : stream | indent - 1 timesRepeat: [ stream nextPutAll: '  ' ].
  				stream nextPutAll: each name ]) ].
  	nonMetaClass
  		allSubclassesWithLevelDo:
  			[ : eachClass : lvl | classDisplayList add:
  				(String streamContents:
+ 					[ : stream | lvl timesRepeat: [ stream nextPutAll: '  ' ].
- 					[ : stream | lvl+1 timesRepeat: [ stream nextPutAll: '  ' ].
  					stream nextPutAll: eachClass name ]) ]
  		startingLevel: superclasses size.
  	self selectClass: nonMetaClass!

Item was changed:
  ----- Method: MessageSet>>reformulateList (in category 'message functions') -----
  reformulateList
  	"The receiver's messageList has been changed; rebuild it"
  	super reformulateList.
+ 	self
+ 		 changed: #messageList ;
+ 		 changed: #messageListIndex.
+ 	self contentsChanged.
+ 	self changed: #autoSelect!
- 	self changed: #messageList.
- 	self changed: #messageListIndex.
- 	self contentsChanged!



More information about the Packages mailing list