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

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

Name: SystemReporter-mt.56
Author: mt
Time: 5 February 2022, 3:55:30.219491 pm
UUID: 3b88c321-5ac5-6d42-97b1-f0992d8a8f85
Ancestors: SystemReporter-mt.55

Put information about the system's fonts into the system reporter.

=============== Diff against SystemReporter-mt.55 ===============

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 Fonts' method: #reportImageFonts;
  		add: #'Image Preferences' method: #reportPreferences;
  		add: #'Image Packages' method: #reportImagePackages;
  		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>>reportImageFonts: (in category 'reporting') -----
+ reportImageFonts: aStream
+ 
+ 	self header: 'Font Size Summary' on: aStream.	
+ 	aStream nextPutAll: TextStyle fontSizeSummaryContents.!