--- a/ProjectDefinition.st	Mon Oct 26 16:59:43 2009 +0100
+++ b/ProjectDefinition.st	Mon Oct 26 17:06:43 2009 +0100
@@ -4154,17 +4154,17 @@
 
 setupForType:typeOrNil
     typeOrNil = GUIApplicationType ifTrue:[
-        self superclass: ApplicationDefinition.
         self compile:'isGUIApplication\    ^ true' withCRs
              categorized:'description'.
+        self superclass: ApplicationDefinition.
         ^ self
     ].
     typeOrNil = NonGUIApplicationType ifTrue:[
-        self superclass: ApplicationDefinition.
         self compile:'isGUIApplication\    ^ false' withCRs
              categorized:'description'.
+        self superclass: ApplicationDefinition.
         ^ self
-    ].                                                  
+    ].                
     self theMetaclass removeSelector: #isGUIApplication.
     self superclass: LibraryDefinition.
     ^ self.
@@ -4869,11 +4869,11 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.268 2009-10-26 15:29:57 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.269 2009-10-26 16:06:43 fm Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.268 2009-10-26 15:29:57 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.269 2009-10-26 16:06:43 fm Exp $'
 ! !
 
 ProjectDefinition initialize!