--- a/Tools__ProjectDefinitionEditor.st	Wed Oct 04 14:48:20 2006 +0200
+++ b/Tools__ProjectDefinitionEditor.st	Thu Oct 05 17:57:20 2006 +0200
@@ -1083,35 +1083,35 @@
 
     ^#(
       (DataSetColumnSpec
-	 label: 'Auto'
-	 labelButtonType: Button
-	 rendererType: CheckToggle
-	 model: autoloaded
-	 canSelect: false
+         label: 'Class'
+         labelAlignment: left
+         labelButtonType: Button
+         model: className
+         canSelect: false
        )
       (DataSetColumnSpec
-	 label: 'Win32'
-	 labelButtonType: Button
-	 rendererType: CheckToggle
-	 model: win32
-	 canSelect: false
+         label: 'Auto'
+         labelButtonType: Button
+         rendererType: CheckToggle
+         model: autoloaded
+         canSelect: false
        )
       (DataSetColumnSpec
-	 label: 'Unix'
-	 labelButtonType: Button
-	 rendererType: CheckToggle
-	 model: unix
-	 canSelect: false
+         label: 'Win32'
+         labelButtonType: Button
+         rendererType: CheckToggle
+         model: win32
+         canSelect: false
        )
       (DataSetColumnSpec
-	 label: 'Class'
-	 labelAlignment: left
-	 labelButtonType: Button
-	 model: className
-	 canSelect: false
+         label: 'Unix'
+         labelButtonType: Button
+         rendererType: CheckToggle
+         model: unix
+         canSelect: false
        )
       )
-
+    
 !
 
 extensionsTableColumns
@@ -1656,9 +1656,9 @@
     isApplicationDefinition := definitionClass isApplicationDefinition.
 
     self isApplicationDefinitionHolder value:isApplicationDefinition.
-    self isNonGUIApplicationHolder value:definitionClass isGUIApplication not.
-    self hasConsoleHolder value:definitionClass isConsoleApplication.
-    self startSinglethreadedHolder value:definitionClass isSingleThreadedApplication.
+    self isNonGUIApplicationHolder value:(isApplicationDefinition and:[definitionClass isGUIApplication not]).
+    self hasConsoleHolder value:(isApplicationDefinition and:[definitionClass isConsoleApplication]).
+    self startSinglethreadedHolder value:(isApplicationDefinition and:[definitionClass isSingleThreadedApplication]).
 
     isApplicationDefinition ifTrue:[
         startupClassName := definitionClass name.
@@ -1703,7 +1703,7 @@
     ].
 
     "Created: / 04-09-2006 / 16:34:39 / cg"
-    "Modified: / 20-09-2006 / 14:41:39 / cg"
+    "Modified: / 04-10-2006 / 21:19:19 / cg"
 !
 
 refetchDefinitionValues