--- a/NewLauncher.st	Thu Jan 29 22:09:34 1998 +0100
+++ b/NewLauncher.st	Thu Jan 29 23:11:20 1998 +0100
@@ -60,6 +60,13 @@
     "Modified: #uninitialize / 29.1.1998 / 22:06:36 / cg"
     "Modified: #current / 29.1.1998 / 22:08:12 / cg"
     "Modified: #openInterface / 29.1.1998 / 22:08:27 / cg"
+    "Modified: #windowSpec / 29.1.1998 / 22:11:54 / cg"
+    "Modified: #windowSpec / 29.1.1998 / 22:11:56 / cg"
+    "Modified: #windowSpec / 29.1.1998 / 22:12:05 / cg"
+    "Created: #resourcePackName / 29.1.1998 / 22:21:41 / cg"
+    "Modified: #openInterface / 29.1.1998 / 22:54:18 / cg"
+    "Modified: #menuSettings / 29.1.1998 / 22:55:13 / cg"
+    "Modified: #openInterface / 29.1.1998 / 23:10:40 / cg"
 ! !
 
 !NewLauncher class methodsFor:'accessing'!
@@ -109,6 +116,15 @@
 
     ^ NotifyingEmergencyHandler ? (NotifyingEmergencyHandler := Exception notifyingEmergencyHandler)
 
+!
+
+resourcePackName
+    "here, we use the same resource strings as Launcher does
+     (until I eventually get renamed to Launcher)"
+
+    ^ 'Launcher'
+
+    "Created: / 29.1.1998 / 22:21:41 / cg"
 ! !
 
 !NewLauncher class methodsFor:'interface specs'!
@@ -1043,7 +1059,7 @@
                 #'label:' 'Language...'
                 #'translateLabel:' true
                 #'value:' #languageSetting
-                #'enabled:' #valueOfEnablingIfAvailable
+                #'enabled:' #enableDangerousMenuItemsInRemoteLauncher
             )
              #(#MenuItem
                 #'label:' 'Keyboard Mappings...'
@@ -1118,6 +1134,8 @@
           ) nil
           nil
       )
+
+    "Modified: / 29.1.1998 / 22:55:13 / cg"
 !
 
 menuToolbar
@@ -1234,11 +1252,11 @@
           #'window:' 
            #(#WindowSpec
               #'name:' 'Smalltalk/X'
-              #'layout:' #(#LayoutFrame 228 0 460 0 647 0 683 0)
+              #'layout:' #(#LayoutFrame 63 0 38 0 658 0 337 0)
               #'label:' 'Smalltalk/X'
               #'min:' #(#Point 420 220)
               #'max:' #(#Point 1152 900)
-              #'bounds:' #(#Rectangle 228 460 648 684)
+              #'bounds:' #(#Rectangle 63 38 659 338)
               #'menu:' #menu
               #'usePreferredExtent:' false
           )
@@ -1270,6 +1288,8 @@
               )
           )
       )
+
+    "Modified: / 29.1.1998 / 22:12:05 / cg"
 !
 
 windowSpecForApplicationSettings
@@ -6744,7 +6764,7 @@
     self builder window windowGroup process priority:(Processor userSchedulingPriority + 1).
     self class openLaunchers add: self.
 
-    "Modified: / 29.1.1998 / 22:08:27 / cg"
+    "Modified: / 29.1.1998 / 23:10:40 / cg"
 !
 
 restarted
@@ -6827,5 +6847,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.17 1998-01-29 21:09:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.18 1998-01-29 22:11:20 cg Exp $'
 ! !