[Pkg] The Trunk: SystemReporter-mt.28.mcz
commits at source.squeak.org
commits at source.squeak.org
Fri Jul 29 11:48:23 UTC 2016
Marcel Taeumel uploaded a new version of SystemReporter to project The Trunk:
http://source.squeak.org/trunk/SystemReporter-mt.28.mcz
==================== Summary ====================
Name: SystemReporter-mt.28
Author: mt
Time: 29 July 2016, 1:48:17.592006 pm
UUID: 1810451e-c781-4c4e-b3d6-8c6d6bb2389b
Ancestors: SystemReporter-mt.27
List Squeak Contributors in the System Reporter.
=============== Diff against SystemReporter-mt.27 ===============
Item was changed:
----- Method: SystemReporter>>initialize (in category 'initialize-release') -----
initialize
self
+ add: #'Contributors' method: #reportContributors;
add: #Image method: #reportImage;
add: #'Image Parameters' method: #reportImageParameters;
add: #'Image Sources' method: #reportSources;
add: #'Image Preferences' method: #reportPreferences;
add: #'MC Repositories' method: #reportRepositories;
add: #'MC Working Copies' method: #reportWorkingCopies;
add: #'VM General' method: #reportVM;
add: #'VM Options' method: #reportVMOptions;
add: #'VM Modules' method: #reportModules;
add: #'VM Parameters' method: #reportVMParameters;
add: #'VM Stats' method: #reportVMStats.
Smalltalk os platformName = 'Win32' ifTrue: [
self
add: #'VM Configuration' method: #reportWin32VMConfig.
].
self
add: #'OS General' method: #reportOS.
Smalltalk os platformName = 'Win32' ifTrue: [
self
add: #'OS Details' method: #reportWin32OSDetails;
add: #'Hardware Details' method: #reportWin32HardwareDetails;
add: #'GFX Hardware Details' method: #reportWin32GFXDetails.
].
Smalltalk os osVersion = 'linux' ifTrue: [
self
add: #'OS Details' method: #reportLinuxOSDetails
].
self
add: #'Tiny Benchmarks' method: #reportTinyBenchmarks;
add: #'Space Analysis' method: #reportSpaceAnalysis;
add: #'SUnit' method: #reportTestRunner;
add: #'Debug Log' method: #reportDebugLog.
categoriesSelected := Set with: #Image with: #'VM General'.
self updateReport
!
Item was added:
+ ----- Method: SystemReporter>>reportContributors: (in category 'reporting') -----
+ reportContributors: 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.
+
+ "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 Packages
mailing list