--- a/Launcher.st	Tue Jul 30 17:44:58 1996 +0200
+++ b/Launcher.st	Fri Aug 02 21:05:34 1996 +0200
@@ -601,27 +601,27 @@
     panel add:(check := CheckBox label:'builtin' model:showBuiltIn).
     box makeTabable:check.
     panel add:(check := CheckBox label:'classLibs' model:showModules).
-    ObjectFileLoader isNil ifTrue:[
+    canDoIt ifFalse:[
         check disable
-    ] ifFalse:[
+    ] ifTrue:[
         box makeTabable:check.
     ].
     panel add:(check := CheckBox label:'methods' model:showMethods).
-    ObjectFileLoader isNil ifTrue:[
+    canDoIt ifFalse:[
         check disable
-    ] ifFalse:[
+    ] ifTrue:[
         box makeTabable:check.
     ].
     panel add:(check := CheckBox label:'c-objects' model:showCObjects).
-    ObjectFileLoader isNil ifTrue:[
+    canDoIt ifFalse:[
         check disable
-    ] ifFalse:[
+    ] ifTrue:[
         box makeTabable:check.
     ].
     panel add:(check := CheckBox label:'others' model:showOthers).
-    ObjectFileLoader isNil ifTrue:[
+    canDoIt ifFalse:[
         check disable
-    ] ifFalse:[
+    ] ifTrue:[
         box makeTabable:check.
     ].
 
@@ -690,7 +690,7 @@
     box destroy.
 
     "Modified: 17.9.1995 / 16:47:50 / claus"
-    "Modified: 15.7.1996 / 08:42:40 / cg"
+    "Modified: 2.8.1996 / 21:04:46 / cg"
 !
 
 snapshot
@@ -3311,5 +3311,5 @@
 !NewLauncher  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.175 1996-07-29 12:59:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.176 1996-08-02 19:05:34 cg Exp $'
 ! !