Marcel Taeumel uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-mt.1086.mcz
==================== Summary ====================
Name: System-mt.1086 Author: mt Time: 15 August 2019, 11:56:27.168945 am UUID: ff933ddb-8d0d-f447-a77e-cef1e48bae95 Ancestors: System-mt.1085
Adds a way to get readable names for old-style preferences. Adds a way to get the source code you need to use those preferences in your projects.
=============== Diff against System-mt.1085 ===============
Item was added: + ----- Method: PragmaPreference>>codeString (in category 'menu') ----- + codeString + "Answer the Smalltalk expressions to get the preference value." + + ^ self provider name, ' ', getter!
Item was added: + ----- Method: Preference>>codeString (in category 'menu') ----- + codeString + "Answer the Smalltalk expressions to get the preference value." + + ^ 'Preferences valueOfFlag: #', self name!
Item was added: + ----- Method: Preference>>copyCode (in category 'menu') ----- + copyCode + "Copy the code for the given preference to the clipboard" + + Clipboard clipboardText: self codeString.!
Item was added: + ----- Method: Preference>>readableName (in category 'menu') ----- + readableName + "Split camel-case preferences into a readable string with spaces." + + | result | + result := (self name includes: Character space) + ifTrue: [self name asString copy] + ifFalse: [self name findFeatures joinSeparatedBy: ' ']. + + "Ensure first letter is uppercase" + result at: 1 put: (result at: 1) asUppercase. + + ^ result!
packages@lists.squeakfoundation.org