Marcel Taeumel uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-mt.1329.mcz
==================== Summary ====================
Name: System-mt.1329 Author: mt Time: 22 March 2022, 10:34:29.373003 am UUID: df77d90e-a2a4-4afb-b1d9-c6c06322ff56 Ancestors: System-mt.1328
Fixes init bug when appending sth. to commmon-request strings that have not yet been initialized.
Also drop manual line breaks in set-author-initials dialog. Use default font size to make text composition look okay.
=============== Diff against System-mt.1328 ===============
Item was changed: ----- Method: Utilities class>>appendToCommonRequests: (in category 'common requests') ----- appendToCommonRequests: aString + self commonRequestStrings: (self commonRequestStrings contents, String cr, aString) - self commonRequestStrings: (CommonRequestStrings contents, String cr, aString)
"Utilities appendToCommonRequests: 'self beep'" !
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><font face="{4}" size="{5}">Our <a href="code://{3}">list of known contributors</{6}> associates the initials you<br>have entered with this name. If this is not you, please<br>consider alternative initials, preferably more than just <br>a few characters, to avoid collisions.<br></font><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'. - Preferences standardButtonFont familyName. - Preferences standardButtonFont pointSize. "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].!
packages@lists.squeakfoundation.org