[squeak-dev] The Inbox: PreferenceBrowser-cbc.103.mcz
Chris Cunningham
cunningham.cb at gmail.com
Tue Jun 2 03:51:14 UTC 2020
I like the PreferenceBrowser verbiage for [Enter], but the formatting in
mt.103. Ideally this could pull from that PreferenceBrowser location, and
the PreferenceBrowser help could be updated. Probably should have included
my preference - sorry about that.
-cbc
On Mon, Jun 1, 2020 at 8:48 PM <commits at source.squeak.org> wrote:
> A new version of PreferenceBrowser was added to project The Inbox:
> http://source.squeak.org/inbox/PreferenceBrowser-cbc.103.mcz
>
> ==================== Summary ====================
>
> Name: PreferenceBrowser-cbc.103
> Author: cbc
> Time: 1 June 2020, 8:47:46.016726 pm
> UUID: a2e0791b-c23c-9044-9d60-4ac9c13e4db0
> Ancestors: PreferenceBrowser-mt.102
>
> Fixes similar issue to mt.103, except uses the test found in
> PreferenceBrowser instead of creating a new text. This method may be
> superior, since the preference help will be localized in one location.
>
> =============== Diff against PreferenceBrowser-mt.102 ===============
>
> Item was changed:
> ----- Method: PreferenceWizardMorph>>initializePage04InteractionMore (in
> category 'initialization - pages') -----
> initializePage04InteractionMore
>
> + | currentPage pane filterableHelp |
> - | currentPage pane |
> currentPage := pages add: self createPage.
> pane := self createScrollPane.
>
> currentPage addMorphBack: (self createLabel: 'Choose more
> interaction settings' color: Color white).
> currentPage addMorphBack: pane.
>
> + "Next line added because using 'normal' lookup does not find the
> right text."
> + filterableHelp := Preferences allPreferences
> + detect:[:pref | pref name = 'Filterable Lists']
> + ifFound: [:pref | (pref helpString lines joinSeparatedBy:
> ' ') withBlanksTrimmed]
> + ifNone: [''].
> pane scroller firstSubmorph addAllMorphsBack: {
> self createCheckbox: 'Windows raise on click' translated
> for: #WindowsRaiseOnClick help: #(window raise).
> self createCheckbox: 'Windows always active' for:
> #WindowsAlwaysActive help: #(window content active).
> self createCheckbox: 'Window buttons always active'
> translated for: #WindowButtonsAlwaysActive help: #(window control active).
> self createVerticalSpace.
> self createCheckbox: 'Smart horizontal splitters'
> translated for: #SmartHorizontalSplitters help: #(horizontal splitter).
> self createCheckbox: 'Smart vertical splitters' translated
> for: #SmartVerticalSplitters help: #(vertical splitter).
> self createVerticalSpace.
> + self createCheckbox: 'Filterable lists and trees'
> translated for: #FilterableLists help: filterableHelp.
> - self createCheckbox: 'Filterable lists and trees'
> translated for: #FilterableLists help: #(filterable).
> self createCheckbox: 'Filters clear if unfocused'
> translated for: #ClearFilterAutomatically help: #(filter clear).
> self createVerticalSpace.
> self createCheckbox: 'Attach tools to mouse' translated
> for: #AttachToolsToMouse help: #(tools attach).
> }.!
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20200601/358bfa34/attachment.html>
More information about the Squeak-dev
mailing list
|