[Pkg] The Trunk: System-ct.1375.mcz

[commits at source.squeak.org]

Christoph Thiede uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ct.1375.mcz

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

Name: System-ct.1375
Author: ct
Time: 26 November 2022, 3:32:09.169627 pm
UUID: 48f83c02-9051-4c40-b43e-f5aade1bb7ab
Ancestors: System-dtl.1374, System-ct.1374

Merges System-ct.1374:
	Fixes formatting of greeting message when entering author initials.

=============== Diff against System-dtl.1374 ===============

Item was changed:
  ----- Method: Utilities class>>setAuthorInitials (in category 'identification') -----
  setAuthorInitials
  	"Put up a dialog allowing the user to specify the author's initials. Inform the user about collisions with known contributors. See SystemNavigation class >> #authors. "
  
  	| newInitials newName |
  	newInitials := Project uiManager
  		request: 'Please type your initials:' translated
  		initialAnswer: AuthorInitials.
  	newInitials ifEmpty: [^ self "No Change"].
  
  	(SystemNavigation authorsInverted at: newInitials ifPresent: [:existingNames |
  		newName := existingNames sorted joinSeparatedBy: '/'.
  
+ 	(self confirm: ('Hello, <b>{1}!!</b> :-)<br><br>Our <a href="code://{3}">list of known contributors</{4}> associates the initials you have entered with this name. If this is not you, please consider alternative initials, preferably more than just a few characters, to avoid collisions.<br><br>Do you want to use these author initials?<br><br>	<b>{2}</b>' translated format: {
- 	(self confirm: ('Hello, <b>{1}</b>!! :-)<br><br>Our <a href="code://{3}">list of known contributors</{4}> associates the initials you have entered with this name. If this is not you, please consider alternative initials, preferably more than just a few characters, to avoid collisions.<br><br>Do you want to use these author initials?<br><br>	<b>{2}</b>' translated format: {
  		newName ifNil: [newInitials].
  		newInitials.
  		'SystemReporter open model categoryAt: 1 put: true'.
  		"mt: Avoid triggering the Windows Defender. See http://lists.squeakfoundation.org/pipermail/squeak-dev/2021-December/217346.html"
  		'a' }) asTextFromHtml) ] ifAbsent: [true])
  			ifTrue: [self authorInitials: newInitials].!