[prev in list] [next in list] [prev in thread] [next in thread] 

List:       squeak-dev
Subject:    [squeak-dev] The Trunk: PreferenceBrowser-mt.103.mcz
From:       commits () source ! squeak ! org
Date:       2020-04-29 18:45:38
Message-ID: E1jTriF-0000Jb-KL () andreas
[Download RAW message or body]

Marcel Taeumel uploaded a new version of PreferenceBrowser to project The Trunk:
http://source.squeak.org/trunk/PreferenceBrowser-mt.103.mcz

==================== Summary ====================

Name: PreferenceBrowser-mt.103
Author: mt
Time: 29 April 2020, 8:45:37.770261 pm
UUID: b939aeb0-0229-c14b-94fe-2fd07189ecb8
Ancestors: PreferenceBrowser-mt.102

Fixes a bug with some redundant tooltip ... because that quick-and-dirty way to find \
existing preferences did not work out.

Note that the preference wizard can provide its own namespace for preferences with \
custom state/getter and setter messages. Luckily, much of the wizard's selection \
matches something from the system-wide Preferences.

Look at the wizard as something that provides a nice first contact to set up \
important stuff in the environment. That "stuff" is not necessarily present in \
Preferences but maybe also in some specific class such as for pragma preferences. So \
the wizard acts as a GoF Facade.

=============== Diff against PreferenceBrowser-mt.102 ===============

Item was changed:
  ----- Method: PreferenceWizardMorph>>initializePage04InteractionMore (in category \
'initialization - pages') -----  initializePage04InteractionMore
  
  	| currentPage pane |
  	currentPage := pages add: self createPage.
  	pane := self createScrollPane.
  	
  	currentPage addMorphBack: (self createLabel: 'Choose more interaction settings' \
color: Color white).  currentPage addMorphBack: pane.
  	
  	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: 'Type something to filter lists. Press [return] to clear the \
                filter. Press [backspace] to clear and restore prior selection.' \
                translated.
- 		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).		  }.!


[prev in list] [next in list] [prev in thread] [next in thread]