Add a utility method in MooseHelp to close PharoHelp

moosetechnology · Aug 18, 2023 · b2071d5 · b2071d5
1 parent 7eccc9d
commit b2071d5
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/src/Moose-Help/MooseWelcome.class.st b/src/Moose-Help/MooseWelcome.class.st
@@ -13,6 +13,14 @@ MooseWelcome class >> bookName [
 	^ 'Moose Tutorial'
 ]
 
+{ #category : #'as yet unclassified' }
+MooseWelcome class >> closePharoWelcomeThenOpen [
+
+	HelpBrowser allInstancesDo: [ :browser | 
+		browser withWindowDo: #close ].
+	self openForRelease
+]
+
 { #category : #pages }
 MooseWelcome class >> mainTools [