[squeak-dev] The Trunk: PreferenceBrowser-mt.138.mcz
commits at source.squeak.org
commits at source.squeak.org
Tue Mar 22 08:21:38 UTC 2022
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!
More information about the Squeak-dev
mailing list
|