Marcel Taeumel uploaded a new version of SystemReporter to project The Trunk:
http://source.squeak.org/trunk/SystemReporter-mt.30.mcz==================== Summary ====================
Name: SystemReporter-mt.30
Author: mt
Time: 19 August 2016, 6:34:20.894803 pm
UUID: 8d824742-73a5-c64c-8a62-8506bb454ee4
Ancestors: SystemReporter-mt.29
For demo/hi-dpi mode compatibility, use the system-wide fixed font and not some hard-coded value.
=============== Diff against SystemReporter-mt.29 ===============
Item was changed:
----- Method: SystemReporter>>updateReport (in category 'updating') -----
updateReport
report := Text streamContents: [:stream |
stream
+ withAttribute: (TextFontReference toFont: Preferences standardFixedFont)
- withAttribute: (TextFontReference toFont: ((TextStyle named: 'BitstreamVeraSansMono') fontOfSize: 16))
do: [
self categoryList do: [:each |
(categoriesSelected includes: each) ifTrue: [
self perform: ((categories at: each), ':') asSymbol with: stream.
stream cr]]]].
self changed: #reportText!