Marcel Taeumel uploaded a new version of GetText to project The Trunk: http://source.squeak.org/trunk/GetText-mt.48.mcz
==================== Summary ====================
Name: GetText-mt.48 Author: mt Time: 6 May 2018, 3:15:57.943836 pm UUID: 80850592-5b4d-044f-8245-3f060b7766fc Ancestors: GetText-topa.47
Supplement to refactoring in Morphic-mt.1427.
=============== Diff against GetText-topa.47 ===============
Item was changed: ----- Method: LanguageEditor>>createButtonLabel:action:help: (in category 'initialization - toolbar') ----- createButtonLabel: aString action: actionSelector help: helpString "create a toolbar for the receiver" | button | button := SimpleButtonMorph new target: self; label: aString translated "font: Preferences standardButtonFont"; actionSelector: actionSelector; setBalloonText: helpString translated; color: translator defaultBackgroundColor twiceDarker; + borderStyle: (BorderStyle raised width: 2). - borderWidth: 2; - borderColor: #raised. "" ^ button!
Item was changed: ----- Method: LanguageEditor>>createUpdatingButtonWording:action:help: (in category 'initialization - toolbar') ----- createUpdatingButtonWording: wordingSelector action: actionSelector help: helpString "create a toolbar for the receiver" | button | button := (UpdatingSimpleButtonMorph newWithLabel: '-') target: self; wordingSelector: wordingSelector; actionSelector: actionSelector; setBalloonText: helpString translated; color: translator defaultBackgroundColor twiceDarker; + borderStyle: (BorderStyle raised width: 1); + cornerStyle: #square. - borderWidth: 1; - borderColor: #raised; cornerStyle: #square. "" ^ button!
packages@lists.squeakfoundation.org