[Pkg] The Trunk: SystemReporter-mt.37.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Jun 29 13:03:58 UTC 2017


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

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

Name: SystemReporter-mt.37
Author: mt
Time: 29 June 2017, 3:03:50.636613 pm
UUID: 677772f4-1903-2e48-8fd7-67c47c5ff48e
Ancestors: SystemReporter-nice.36

Fixes some glitch with the font in the system reporter's report.

=============== Diff against SystemReporter-nice.36 ===============

Item was changed:
  ----- Method: SystemReporter>>buildReportWith: (in category 'building') -----
  buildReportWith: aBuilder
  	^ aBuilder pluggableTextSpec new
  		model: self;
+ 		font: Preferences standardFixedFont;
  		menu: #reportMenu:;
  		getText: #reportText;
  		yourself.!

Item was changed:
  ----- Method: SystemReporter>>updateReport (in category 'updating') -----
  updateReport
  	report := Text streamContents: [:stream | 
+ 		self categoryList do: [:each |
+ 			(categoriesSelected includes: each) ifTrue: [
+ 				self perform: ((categories at: each), ':') asSymbol with: stream.
+ 				stream cr]]].
+ 	self changed: #reportText.!
- 		stream 
- 			withAttribute: (TextFontReference toFont: Preferences standardFixedFont)
- 			do: [
- 				self categoryList do: [:each |
- 					(categoriesSelected includes: each) ifTrue: [
- 						self perform: ((categories at: each), ':') asSymbol with: stream.
- 						stream cr]]]].
- 	self changed: #reportText!



More information about the Packages mailing list