[Pkg] The Trunk: Tools-nice.261.mcz

[commits at source.squeak.org]

Nicolas Cellier uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-nice.261.mcz

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

Name: Tools-nice.261
Author: nice
Time: 22 August 2010, 8:49:47.324 pm
UUID: 08276f8a-6725-44d9-8f17-6d546d34ab76
Ancestors: Tools-ar.260

minor change: avoid creating a SortedCollection when not necessary...
asSortedCollection asArray -> asArray sort

=============== Diff against Tools-ar.260 ===============

Item was changed:
  ----- Method: MessageSet>>sortByDate (in category 'message list') -----
  sortByDate
  	"Sort the message-list by date of time-stamp"
  
  	| assocs inOrder |
  	assocs := messageList collect:
  		[:aRef | | aDate aCompiledMethod |
  			aDate := aRef methodSymbol == #Comment
  				ifTrue:
  					[aRef actualClass organization dateCommentLastSubmitted]
  				ifFalse:
  					[aCompiledMethod := aRef actualClass compiledMethodAt: aRef methodSymbol ifAbsent: [nil].
  					aCompiledMethod ifNotNil: [aCompiledMethod dateMethodLastSubmitted]].
  			aRef -> (aDate ifNil: [Date fromString: '01/01/1996'])].  "The dawn of Squeak history"
+ 	inOrder := assocs asArray sort: [:a :b | a value < b value].
- 	inOrder := assocs asSortedCollection:
- 		[:a :b | a value < b value].
  
+ 	messageList := inOrder collect: [:assoc | assoc key].
- 	messageList := inOrder asArray collect: [:assoc | assoc key].
  	self changed: #messageList!