[squeak-dev] The Trunk: PreferenceBrowser-mt.150.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Jun 15 10:20:12 UTC 2022
Marcel Taeumel uploaded a new version of PreferenceBrowser to project The Trunk:
http://source.squeak.org/trunk/PreferenceBrowser-mt.150.mcz
==================== Summary ====================
Name: PreferenceBrowser-mt.150
Author: mt
Time: 15 June 2022, 12:20:11.60431 pm
UUID: 59246927-cb5d-ff4c-bef2-918658d0acdd
Ancestors: PreferenceBrowser-mt.149
Experiment is over. Load 60Deprecated again by default. Opt-out via Monticello Browser -> Unload Package.
=============== Diff against PreferenceBrowser-mt.149 ===============
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)
hResizing: #shrinkWrap;
averageLineLength: 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;
averageLineLength: 65;
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);
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.
+ "self createCheckbox: 'Compatibility packages for legacy apps' translated for: #InstallCompatibilityPackages help: 'Install protocols (i.e., classes and methods) that got deprecated for this version to make older applications work without changes.' translated."
- self createCheckbox: 'Compatibility packages for legacy apps' translated for: #InstallCompatibilityPackages help: 'Install protocols (i.e., classes and methods) that got deprecated for this version to make older applications work without changes.' 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!
Item was changed:
----- Method: PreferenceWizardMorph>>installExtraPackages (in category 'actions') -----
installExtraPackages
"Removes the buttons and adds the progress bar during installation."
| steps page |
self removeProperty: #checkInternet. "No frequent checks for connectivity from here."
steps := #(
InstallLatestUpdates
+ "InstallCompatibilityPackages"
- InstallCompatibilityPackages
InstallMetacello
InstallRefactoringTools
InstallAutoComplete
InstallGitInfrastructure
InstallFFI
InstallOSProcess
InstallSqueakInboxTalk )
select: [:ea | self perform: ('state', ea) asSymbol].
page := controlMorph firstSubmorph.
page submorphs second hide. "question"
page submorphs last delete. "url"
page submorphs last delete. "no button"
page submorphs last delete. "yes button"
page submorphs last delete. "package list"
self refreshWorld.
[
PreferenceWizardProgressMorph install.
page
addMorphBack: PreferenceWizardProgressMorph uniqueInstance;
addMorphBack: self createVerticalSpacer.
steps
do: [:step | self perform: step withFirstCharacterDownshifted asSymbol]
displayingProgress: [:step | String streamContents: [:s |
step findFeatureIndicesDo: [:start :end |
s nextPutAll: (step copyFrom: start to: end); space].
s nextPutAll: '...']].
] ensure: [
PreferenceWizardProgressMorph reset.
self showSqueak].!
More information about the Squeak-dev
mailing list
|