*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 05 Oct 1998 13:42:30 +0200
changeset 1915 ff2a757c819c
parent 1914 d94b77e0ef43
child 1916 5d970f0f3dd7
*** empty log message ***
NewLauncher.st
--- a/NewLauncher.st	Mon Oct 05 13:38:52 1998 +0200
+++ b/NewLauncher.st	Mon Oct 05 13:42:30 1998 +0200
@@ -1036,15 +1036,6 @@
                           #activeHelpKey: #systemGarbageCollectAndCompress
                           #labelImage: #(#ResourceRetriever nil #garbageCollectIcon 'Collect Garbage And Compress')
                       )
-                       #(#MenuItem
-                          #label: '-'
-                          #isVisible: #javaSupportPresent
-                      )
-                       #(#MenuItem
-                          #label: 'Reinit Java VM'
-                          #isVisible: #javaSupportPresent
-                          #value: #initJavaVM
-                      )
                     ) nil
                     nil
                 )
@@ -1116,6 +1107,13 @@
                           #enabled: #enableDangerousMenuItemsInRemoteLauncher
                       )
                        #(#MenuItem
+                          #label: 'Java...'
+                          #translateLabel: true
+                          #value: #javaSettings
+                          #activeHelpKey: #settingsJava
+                          #isVisible: #javaSupportPresent
+                      )
+                       #(#MenuItem
                           #label: '-'
                       )
                        #(#MenuItem
@@ -3062,6 +3060,14 @@
     "Modified: / 31.7.1998 / 22:45:44 / cg"
 !
 
+javaSettings
+    "open a dialog on java-subsystem related settings"
+
+    Launcher::LauncherDialogs javaSettingsFor:self.
+
+    "Modified: / 31.7.1998 / 22:46:13 / cg"
+!
+
 keyboardSetting 
     "open a dialog on keyboard related settings"
 
@@ -3572,5 +3578,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.110 1998-10-05 11:38:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.111 1998-10-05 11:42:30 cg Exp $'
 ! !