The Trunk: PreferenceBrowser-mt.114.mcz

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.!