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

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

Name: PreferenceBrowser-mt.114
Author: mt
Time: 18 May 2021, 2:05:20.131287 pm
UUID: a4e8648a-e41f-474f-9017-b5b5ec7f7f8a
Ancestors: PreferenceBrowser-mt.113

Add the two new workspace preferences to the wizard because both are primarily intended for newcomers.

=============== Diff against PreferenceBrowser-mt.113 ===============

Item was changed:
  ----- Method: PreferenceWizardMorph>>initializePage05Tools (in category 'initialization - pages') -----
  initializePage05Tools
  
  	| currentPage pane |
  	currentPage := pages add: self createPage.
  	pane := self createScrollPane.
  	
  	currentPage addMorphBack: (self createLabel: 'Choose other settings' color: Color white).
  	currentPage addMorphBack: pane.
  	
  	pane scroller firstSubmorph addAllMorphsBack: {
  		self createCheckbox: 'Trace messages browser' translated for: #TraceMessages help: #(trace message).
+ 		self createCheckbox: 'Browse class hierarchy' translated for: #AlternativeBrowseIt help: 'Whether to spawn a hierarchy browser or full system browser on browse-it commands.' translated.
+ 		self createVerticalSpace.
  		self createCheckbox: 'Reuse tool windows' translated for: #ReuseWindows help: #(window reuse).
  		self createCheckbox: 'Tool and menu icons' translated for: #ToolAndMenuIcons help: 'Whether to show icons in tools and menus.' translated.
+ 		self createVerticalSpace.
+ 		self createCheckbox: 'Embed Transcript in Workspace' translated for: #WorkspaceEmbedTranscript help: #(workspace transcript).
+ 		self createCheckbox: 'File-out on accept' translated for: #WorkspaceFileOutOnAccept help: #(workspace accept).
- 		self createCheckbox: 'Browse class hierarchy' translated for: #AlternativeBrowseIt help: 'Whether to spawn a hierarchy browser or full system browser on browse-it commands.' translated.
  		}.
  !

Item was added:
+ ----- Method: PreferenceWizardMorph>>stateWorkspaceEmbedTranscript (in category 'actions - buttons') -----
+ stateWorkspaceEmbedTranscript
+ 
+ 	^ Workspace embedTranscript!

Item was added:
+ ----- Method: PreferenceWizardMorph>>stateWorkspaceFileOutOnAccept (in category 'actions - buttons') -----
+ stateWorkspaceFileOutOnAccept
+ 
+ 	^ Workspace fileOutOnAccept!

Item was added:
+ ----- Method: PreferenceWizardMorph>>toggleWorkspaceEmbedTranscript (in category 'actions - buttons') -----
+ toggleWorkspaceEmbedTranscript
+ 
+ 	Workspace embedTranscript: Workspace embedTranscript not.!

Item was added:
+ ----- Method: PreferenceWizardMorph>>toggleWorkspaceFileOutOnAccept (in category 'actions - buttons') -----
+ toggleWorkspaceFileOutOnAccept
+ 
+ 	Workspace fileOutOnAccept: Workspace fileOutOnAccept not.!