tim Rowledge uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-tpr.1125.mcz
==================== Summary ====================
Name: System-tpr.1125 Author: tpr Time: 26 November 2019, 12:41:51.836859 pm UUID: dd0aed77-eb3e-4d57-b1c9-3f6fbb5d9674 Ancestors: System-mt.1124
Improve MessageBrowser labelling a bit; see changes in Tools-tpr.919
=============== Diff against System-mt.1124 ===============
Item was changed: ----- Method: SystemNavigation>>headingAndAutoselectForLiteral:do: (in category 'private') ----- headingAndAutoselectForLiteral: aLiteral do: binaryBlock "Evaluate binaryBlock with either Users of ... or Senders of ... plus the auto-select string for the given literal. aLiteral can be a Symbol, a VariableBinding or an arbitrary object." | autoSelect | ^ aLiteral isSymbol ifTrue: [ binaryBlock value: 'Senders of ' , aLiteral + value: aLiteral ] - value: (aLiteral keywords ifEmpty: [aLiteral] ifNotEmpty: [:keys | keys first]) ] ifFalse: [ autoSelect := aLiteral isVariableBinding ifTrue: [ aLiteral key ] ifFalse: [ aLiteral printString ]. binaryBlock value: 'Users of ' , autoSelect value: autoSelect ]!