Marcel Taeumel uploaded a new version of PreferenceBrowser to project The Trunk: http://source.squeak.org/trunk/PreferenceBrowser-mt.138.mcz
==================== Summary ====================
Name: PreferenceBrowser-mt.138 Author: mt Time: 22 March 2022, 9:21:37.875661 am UUID: 9b7294f1-999a-2649-ba2f-40dc2c64bd39 Ancestors: PreferenceBrowser-mt.137
Minor layout tweaks in preference wizard.
=============== Diff against PreferenceBrowser-mt.137 ===============
Item was added: + ----- Method: PreferenceWizardMorph>>defaultTextStyle (in category 'initialization') ----- + defaultTextStyle + + ^ self defaultFont textStyle!
Item was changed: ----- Method: PreferenceWizardMorph>>initializePage99ExtraPackages (in category 'initialization - pages') ----- initializePage99ExtraPackages "Let the user install extra packages."
| currentPage packagesList installButton | currentPage := self createPage. currentPage cellPositioning: #topCenter; addMorphBack: self createHorizontalSpacer; + addMorphBack: ((self createLabel: 'Do you want to install extra packages?' translated color: Color white) - addMorphBack: ((self createLabel: 'Do you want to install extra packages?' color: Color white) hResizing: #shrinkWrap; + numCharactersPerLine: 65; yourself); + addMorphBack: ((self createLabel: 'Note that the installation process requires a network connection with Internet access and might take several minutes.' translated color: (Color gray: 0.9)) + hResizing: #shrinkWrap; + numCharactersPerLine: 65; - addMorphBack: ((self createLabel: 'Note that the installation process requires a network connection with Internet access and might take several minutes.' color: (Color gray: 0.9)) - hResizing: #rigid; - vResizing: #shrinkWrap; - width: (self defaultFont widthOf: $x) * 55; yourself). currentPage submorphs last text addAttribute: TextAlignment centered. currentPage submorphs last layoutChanged. currentPage addMorphBack: (self createVerticalSpace height: self layoutInset). packagesList := self createScrollPane. packagesList + width: (self defaultTextStyle compositionWidthFor: 65); - width: (self defaultFont widthOf: $x) * 40; hResizing: #rigid; vResizing: #spaceFill.
packagesList scroller firstSubmorph addAllMorphsBack: { self createCheckbox: 'Latest system updates' translated for: #InstallLatestUpdates help: 'Install the latest patches for ' translated, SystemVersion current version. self createCheckbox: 'Refactoring support in code browsers' translated for: #InstallRefactoringTools help: 'Refactoring is a process of re-writing or re-organizing text or code. The purpose of a refactor is to make the code or text more understandable and readable while exactly preserving its meaning and behavior' translated. self createCheckbox: 'Autocomplete in code editors' translated for: #InstallAutoComplete help: 'Package that provides interactive, context-sensitive auto-completion for Squeak' translated. self createCheckbox: 'Git support and browser' translated for: #InstallGitInfrastructure help: 'From the Git Browser, you can create new commits, synchronize with remote repositories (fetch, pull, push), manage and merge branches, switch between them, and compare different versions' translated. self createCheckbox: 'Foreign function interface (FFI)' translated for: #InstallFFI help: 'FFI, the Squeak Foreign Function Interface, is used to call functions located in shared libraries that are not part of the Squeak VM nor its plugins' translated. self createCheckbox: 'Access OS functions' translated for: #InstallOSProcess help: 'OSProcess provides access to operating system functions, including pipes and child process creation' translated. self createCheckbox: 'Integrate Squeak''s mailing lists' translated for: #InstallSqueakInboxTalk help: 'Through Squeak Inbox Talk, you can engage with our community from within Squeak using tools that integrate our mailing lists such as squeak-dev and vm-dev' translated. }. currentPage addMorphBack: packagesList.
currentPage addMorphBack: ((self createLabel: 'Find more on www.squeak.org/projects' color: (Color gray: 0.9)) hResizing: #shrinkWrap; yourself). installButton := self createButton action: #installExtraPackagesVia:; label: 'Yes, install selected packages.' translated; yourself. installButton setProperty: #label toValue: installButton label; arguments: {installButton}. currentPage addMorphBack: installButton. currentPage addMorphBack: (self createButton action: #showSqueak; label: 'No, maybe later.' translated). ^ currentPage!
packages@lists.squeakfoundation.org