[squeak-dev] The Trunk: SystemReporter-mt.29.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Jul 29 11:56:36 UTC 2016


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

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

Name: SystemReporter-mt.29
Author: mt
Time: 29 July 2016, 1:56:31.420062 pm
UUID: acb6c18a-32cd-0346-a521-610207d5c2f2
Ancestors: SystemReporter-mt.28

Order all Squeak Contributors alphabetically.

=============== Diff against SystemReporter-mt.28 ===============

Item was changed:
  ----- Method: SystemReporter>>reportContributors: (in category 'reporting') -----
  reportContributors: stream
  
+ 	self header: 'Squeak Contributors (alphabetically)' on: stream.
- 	| squeakBoardAuthors |
- 	self header: 'Squeak Contributors' on: stream.
  	
  	stream withAttribute: (TextColor color: (Color r: 0 g: 0.5 b: 0)) do: [
  		stream nextPutAll: 'If we forgot to mention YOU in this list, please report to board at lists.squeakfoundation.org'].
+ 	stream cr; cr.
- 	stream cr.
  	
+ 	SystemNavigation authors keys sorted do: [:fullName |
- 	"Squeak Oversight Board Members and other influential Squeakers since its first days. :-)"
- 	squeakBoardAuthors := (SystemNavigation authors keys
- 		select: [:nm | #(curtis kaehler ingalls teitelbaum freudenberg latta 't. lewis' muller rowledge taeumel uzonyi assumpcao black causey cleene cunnington groot denker ducasse miranda ohshima putney raab schwartz shearar stasenko vuletich) anySatisfy: [:token | nm includesSubstring: token caseSensitive: false]]).
- 	
- 	stream cr.
- 	squeakBoardAuthors sorted do: [:fullName |
  		(SystemNavigation authors at: fullName) in: [:abbreviations |
- 			stream nextPutAll: ('{1} ({2})' format: {fullName. abbreviations asArray joinSeparatedBy: ' '}); cr]].
- 	
- 	stream cr.
- 	stream withAttribute: (TextColor color: (Color r: 0 g: 0.5 b: 0)) do: [
- 		stream nextPutAll: '_,.-''~''-.,__,.-''~''-.,__,.-''~''-.,__,.-''~''-.,__,.-''~''-.,_'].
- 	stream cr;cr .
- 	
- 	(SystemNavigation authors keys copyWithoutAll: squeakBoardAuthors) sorted do: [:fullName |
- 		(SystemNavigation authors at: fullName) in: [:abbreviations |
  			stream nextPutAll: ('{1} ({2})' format: {fullName. abbreviations asArray joinSeparatedBy: ' '}); cr]].!



More information about the Squeak-dev mailing list