[squeak-dev] The Trunk: PreferenceBrowser-mt.83.mcz

commits at source.squeak.org commits at source.squeak.org
Sun May 6 13:14:31 UTC 2018


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

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

Name: PreferenceBrowser-mt.83
Author: mt
Time: 6 May 2018, 3:14:32.145836 pm
UUID: c19b2b4a-7fff-0d41-9e31-cd0cade6fc4d
Ancestors: PreferenceBrowser-mt.82

Supplement to refactoring in Morphic-mt.1427.

=============== Diff against PreferenceBrowser-mt.82 ===============

Item was changed:
  ----- Method: PBClassPreferenceView>>textField (in category 'user interface') -----
  textField
  
  	| field |
  	field := PluggableTextMorphPlus
  		on: self
  		text: #preferenceValue
  		accept: #preferenceValue:.
  	field
+ 		borderStyle: BorderStyle inset;
+ 		borderWidth: 1;
  		hideScrollBarsIndefinitely;
  		acceptOnCR: true;
  		minimumHeight: 0;
  		vResizing: #rigid;
  		hResizing: #spaceFill;
  		height: TextStyle defaultFont height + 6.
  	
  	styler ifNotNil: [:s | field styler: (s view: field)].
  	
  	^ field!

Item was changed:
  ----- Method: PBNumericPreferenceView>>textField (in category 'user interface') -----
  textField
  	^(PluggableTextMorph
  		on: self
  		text: #preferenceValue
  		accept: #preferenceValue:)
+ 			borderStyle: BorderStyle inset;
+ 			borderWidth: 1;
  			hideScrollBarsIndefinitely;
  			acceptOnCR: true;
  			vResizing: #rigid;
  			hResizing: #spaceFill;
  			height: TextStyle defaultFont height + 6;
  			yourself.!

Item was changed:
  ----- Method: PBTextPreferenceView>>textField (in category 'user interface') -----
  textField
  	^(PluggableTextMorph
  		on: self
  		text: #preferenceValue
  		accept: #preferenceValue:)
  			hideScrollBarsIndefinitely;
+ 			borderStyle: BorderStyle inset;
+ 			borderWidth: 1;
- 			borderColor: #inset;
- 			acceptOnCR: true;
- 			color: Color gray veryMuchLighter;
  			vResizing: #rigid;
  			hResizing: #spaceFill;
  			height: TextStyle defaultFont height + 6;
  			yourself.!

Item was changed:
  ----- Method: PreferenceBrowserMorph>>updateSelectedCategoryPreferences (in category 'updating') -----
  updateSelectedCategoryPreferences
  	Cursor wait showWhile: 
  		[self preferenceList 
  				hScrollBarValue: 0;
  				vScrollBarValue: 0.
  		self preferenceList scroller removeAllMorphs.
  		self preferenceList scroller addMorphBack: self newPreferenceListInnerPanel.
+ 		self adjustPreferenceListItemsWidth.
+ 		self adoptPaneColor: self paneColor]!
- 		self adjustPreferenceListItemsWidth]!



More information about the Squeak-dev mailing list