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

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

Name: ToolBuilder-Kernel-mt.154
Author: mt
Time: 10 February 2022, 11:59:49.684307 am
UUID: e30b63bf-ebe7-b74e-ae91-916140686aa8
Ancestors: ToolBuilder-Kernel-mt.153

Allow configuration of both #font: and #textStyle: in tool builder. Works the same as #help: (all) and #label: (windows).

=============== Diff against ToolBuilder-Kernel-mt.153 ===============

Item was changed:
  PluggableWidgetSpec subclass: #PluggableTextSpec
+ 	instanceVariableNames: 'getText setText selection menu askBeforeDiscardingEdits editText indicateUnacceptedChanges stylerClass font textStyle readOnly softLineWrap hardLineWrap textColor plainTextOnly'
- 	instanceVariableNames: 'getText setText selection menu askBeforeDiscardingEdits editText indicateUnacceptedChanges stylerClass font readOnly softLineWrap hardLineWrap textColor plainTextOnly'
  	classVariableNames: ''
  	poolDictionaries: ''
  	category: 'ToolBuilder-Kernel'!
  
  !PluggableTextSpec commentStamp: 'ar 2/11/2005 21:58' prior: 0!
  A text editor.
  
  Instance variables:
  	getText	<Symbol>	The selector to retrieve the text.
  	setText	<Symbol>	The selector to set the text.
  	selection <Symbol>	The selector to retrieve the text selection.
  	menu	<Symbol>	The selector to offer (to retrieve?) the context menu.
  	color	 <Symbol>	The selector to retrieve the background color.
  
  !

Item was changed:
  ----- Method: PluggableTextSpec>>font: (in category 'accessing') -----
+ font: aFontOrSymbol
+ 	"Configure the font of the text field. You can provide a Symbol to let model's change their font dynamically."
+ 	
+ 	font := aFontOrSymbol.!
- font: aFont
- 	font := aFont.!

Item was added:
+ ----- Method: PluggableTextSpec>>textStyle (in category 'accessing') -----
+ textStyle
+ 	^ textStyle!

Item was added:
+ ----- Method: PluggableTextSpec>>textStyle: (in category 'accessing') -----
+ textStyle: aTextStyleOrSymbol
+ 	"Configure the text style (i.e., usually same font family at different sizes to be used with TextFontChange attribute) of the text field. You can provide a Symbol to let model's change their text style dynamically."
+ 	
+ 	textStyle := aTextStyleOrSymbol.!

Item was changed:
  ----- Method: ToolBuilderSpec>>help: (in category 'accessing') -----
+ help: aSymbolOrStringOrText
+ 	"Indicate the message to retrieve the help texts of this element. You can directly configure a static instance of String or Text as help."
+ 	
+ 	help := aSymbolOrStringOrText!
- help: aSymbol 
- 	"Indicate the message to retrieve the help texts of this element."
- 	help := aSymbol!