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 ]!