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

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

Name: PreferenceBrowser-mt.130
Author: mt
Time: 8 February 2022, 1:47:35.371027 pm
UUID: f978e43f-7930-3c4a-83d5-316e86dfd6e9
Ancestors: PreferenceBrowser-mt.129

Complements Morphic-mt.1876

=============== Diff against PreferenceBrowser-mt.129 ===============

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;
  		wrapFlag: false;
- 		minimumHeight: 0;
  		vResizing: #rigid;
  		hResizing: #spaceFill;
+ 		height: ToolBuilder default inputFieldHeight.
- 		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;
  			wrapFlag: false;
  			vResizing: #rigid;
  			hResizing: #spaceFill;
+ 			height: ToolBuilder default inputFieldHeight;
- 			height: TextStyle defaultFont height + 6;
  			yourself.!

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

Item was changed:
  ----- Method: PreferenceBrowserMorph>>buttonRowLayoutFrame (in category 'submorphs - buttons') -----
  buttonRowLayoutFrame 
  
  	^ LayoutFrame
  		fractions: (0 at 0 corner: 1 at 0)
+ 		offsets: (0 at 0 corner: 0@ ToolBuilder default buttonRowHeight)!
- 		offsets: (0 at 0 corner: 0@ (Preferences standardButtonFont height * 2.5) truncated)!

Item was changed:
  ----- Method: PreferenceBrowserMorph>>searchTextFieldLayoutFrame (in category 'submorphs - search panel') -----
  searchTextFieldLayoutFrame
  	
  	^ LayoutFrame
  		fractions: (0 at 0 corner: 1 at 0)
+ 		offsets: (0 at 0 corner: 0@ ToolBuilder default inputFieldHeight)!
- 		offsets: (0 at 0 corner: 0@ (Preferences standardDefaultTextFont height * 3/2) truncated)!