changed: #initializeAllProjectDefinitions
authorStefan Vogel <sv@exept.de>
Mon, 07 Mar 2011 11:10:20 +0100
changeset 13312 a44238be6724
parent 13311 53dece2ccaa1
child 13313 e5a29a7594be
changed: #initializeAllProjectDefinitions Mark initially loaded projects as loaded
ProjectDefinition.st
--- a/ProjectDefinition.st	Mon Feb 28 13:27:23 2011 +0100
+++ b/ProjectDefinition.st	Mon Mar 07 11:10:20 2011 +0100
@@ -1068,12 +1068,16 @@
      Therefore, its not invoked by #initialize, but instead explicitely,
      by Smalltalk"
 
-    Smalltalk isStandAloneApp ifFalse:[
-        self allSubclassesDo:[:eachProjectDefinitionClass |
+     |isStandAloneApp|
+
+     isStandAloneApp := Smalltalk isStandAloneApp.
+
+     self allSubclassesDo:[:eachProjectDefinitionClass |
+        isStandAloneApp ifFalse:[
             eachProjectDefinitionClass installAutoloadedClasses.
-            eachProjectDefinitionClass projectIsLoaded:true.
         ].
-    ].
+        eachProjectDefinitionClass projectIsLoaded:true.
+     ].
 
     "
      self initialize
@@ -5664,11 +5668,11 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.334 2011-02-22 10:31:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.335 2011-03-07 10:10:20 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.334 2011-02-22 10:31:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.335 2011-03-07 10:10:20 stefan Exp $'
 ! !
 
 ProjectDefinition initialize!