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

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

Name: Tools-mt.1166
Author: mt
Time: 22 June 2022, 3:14:20.916264 pm
UUID: 44b8ab83-2847-7b42-86ae-a774a407c7f2
Ancestors: Tools-mt.1165, Tools-kfr.1161, Tools-ct.1147

Merges Tools-kfr.1161, Tools-ct.1147.

Tools-kfr.1161:
	Open a HelpBrowser with TextLink. [...]
Tools-ct.1147:
	Updates workspace styles after toggling #shouldStyle preference. This also improves the liveness in the preference wizard.

=============== Diff against Tools-mt.1165 ===============

Item was changed:
  ----- Method: Model>>addItem: (in category '*Tools') -----
  addItem: classAndMethod
  	"Open a browser directly on the given class and method
  	
  	Model new addItem: 'Model addItem:'
  	Model new addItem: 'Model>>addItem:'
  	"
  	
  	self flag: #mref.	"classAndMethod is a String"
  	MessageSet 
  		parse: classAndMethod  
  		toClassAndSelector: [ :class :sel |
  			class ifNil: [^self].
  			sel = #Comment ifTrue: [^ Browser fullOnClassComment: class].
  			sel = #Definition ifTrue: [^ Browser newOnClass: class].
  			sel = #Hierarchy ifTrue: [^ HierarchyBrowser fullOnClass: class].
+ 			sel = #Help ifTrue: [^HelpBrowser openOn: class].
  			Browser newOnClass: class selector: sel
  		]
  
  !

Item was changed:
  ----- Method: Workspace class>>shouldStyle: (in category 'preferences') -----
  shouldStyle: aBoolean
  
+ 	ShouldStyle := aBoolean.
+ 	
+ 	self allSubInstancesDo: [:workspace | workspace changed: #style].!
- 	ShouldStyle := aBoolean!