--- a/NewLauncher.st	Fri Feb 26 00:06:36 1999 +0100
+++ b/NewLauncher.st	Fri Feb 26 01:02:39 1999 +0100
@@ -1082,6 +1082,7 @@
                           #label: 'Tools...'
                           #translateLabel: true
                           #value: #toolSettings
+                          #enabled: #enableDangerousMenuItemsInRemoteLauncher
                       )
                        #(#MenuItem
                           #label: 'Java...'
@@ -1132,6 +1133,7 @@
                           #translateLabel: true
                           #value: #saveSettings
                           #activeHelpKey: #settingsSaveSettings
+                          #enabled: #enableDangerousMenuItemsInRemoteLauncher
                       )
                        #(#MenuItem
                           #label: 'Load Settings...'
@@ -1209,12 +1211,14 @@
                           #translateLabel: true
                           #value: #findAndRaiseWindow
                           #activeHelpKey: #windowsFindAndRaise
+                          #enabled: #enableDangerousMenuItemsInRemoteLauncher
                       )
                        #(#MenuItem
                           #label: 'Find And Destroy...'
                           #translateLabel: true
                           #value: #findAndDestroyWindow
                           #activeHelpKey: #windowsFindAndDestroy
+                          #enabled: #enableDangerousMenuItemsInRemoteLauncher
                       )
                        #(#MenuItem
                           #label: '-'
@@ -1714,8 +1718,6 @@
           ) nil
           nil
       )
-
-    "Modified: / 6.1.1999 / 14:13:30 / cg"
 !
 
 menuToolbar
@@ -1758,6 +1760,7 @@
                 #isButton: true
                 #value: #saveImageAs
                 #activeHelpKey: #fileSaveImageAs
+                #enabled: #enableDangerousMenuItemsInRemoteLauncher
                 #labelImage: #(#ResourceRetriever nil #saveImageIcon)
             )
              #(#MenuItem
@@ -1834,8 +1837,6 @@
           ) nil
           nil
       )
-
-    "Modified: / 13.10.1998 / 15:59:17 / cg"
 ! !
 
 !NewLauncher class methodsFor:'resources'!
@@ -2625,7 +2626,7 @@
 redrawAllWindows
     |setOfViews|
 
-    setOfViews := Screen current knownViews.
+    setOfViews := device knownViews.
 
     setOfViews do:[:aView |
         aView shown ifTrue:[
@@ -2658,5 +2659,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.130 1999-02-25 23:05:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.131 1999-02-26 00:02:27 cg Exp $'
 ! !