Levente Uzonyi uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ul.737.mcz

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

Name: System-ul.737
Author: ul
Time: 6 May 2015, 1:09:16.373 pm
UUID: 80332b98-672e-40b3-a04b-8aee101654d0
Ancestors: System-kfr.736

#groupBy:having -> #groupBy:

=============== Diff against System-kfr.736 ===============

Item was changed:
  ----- Method: MessageTally>>rootPrintOn:total:totalTime:threshold: (in category 'printing') -----
  rootPrintOn: aStream total: total totalTime: totalTime threshold: threshold
  
  	| groups sons |
  	sons := self sonsOver: threshold.
+ 	groups := sons groupBy: [ :aTally | aTally process ].
- 	groups := sons groupBy: [ :aTally | aTally process] having: [ :g | true].
  	groups keysAndValuesDo: [ :p :g |
  		(reportOtherProcesses or: [ p notNil ]) ifTrue: [
  			aStream nextPutAll: '--------------------------------'; cr.
  			aStream nextPutAll: 'Process: ',  (p ifNil: [ 'other processes'] ifNotNil: [ p browserPrintString]); cr.
  			aStream nextPutAll: '--------------------------------'; cr.
  			g sort do:[:aSon | 
  				aSon 
  					treePrintOn: aStream
  					tabs: OrderedCollection new
  					thisTab: ''
  					total: total
  					totalTime: totalTime
  					tallyExact: false
  					orThreshold: threshold]].
  	]!