--- a/NewLauncher.st	Thu May 11 12:09:00 2000 +0200
+++ b/NewLauncher.st	Fri May 12 09:20:36 2000 +0200
@@ -12,6 +12,8 @@
 
 
 
+"{ Package: 'stx:libtool' }"
+
 AbstractLauncherApplication subclass:#NewLauncher
 	instanceVariableNames:'isMainLauncher helpIsOn'
 	classVariableNames:'UserAddedTools'
@@ -780,7 +782,7 @@
                   #labelImage: #(#ResourceRetriever nil #startSystemBrowserIcon 'System Browser')
                 )
                #(#MenuItem
-                  #label: 'System Browser In Class'
+                  #label: 'System Browser On Class'
                   #translateLabel: true
                   #activeHelpKey: #classesSystemBrowserOnClass
                   #labelImage: #(#ResourceRetriever nil #startSystemBrowserOnHistoryClassIcon 'System Browser On Class')
@@ -1456,6 +1458,15 @@
                         #activeHelpKey: #demosGlobe
                         #argument: 'GlobeDemo'
                       )
+                     #(#MenuItem
+                        #label: '-'
+                      )
+                     #(#MenuItem
+                        #label: 'Towers of Hanoi'
+                        #translateLabel: true
+                        #value: #openDemo:
+                        #argument: 'Prolog::TowersOfHanoiApplication'
+                      )
                      )
                     nil
                     nil
@@ -2915,5 +2926,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.174 2000-03-02 14:42:27 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.175 2000-05-12 07:20:36 cg Exp $'
 ! !