--- a/ProjectDefinition.st	Tue Apr 08 23:27:07 2008 +0200
+++ b/ProjectDefinition.st	Wed Apr 09 10:20:59 2008 +0200
@@ -2778,7 +2778,7 @@
                                 already add:scls.
                             ].
                         cls 
-                            privateClassesDo:[:eachPrivateClass | 
+                            allPrivateClassesDo:[:eachPrivateClass | 
                                 eachPrivateClass 
                                     allSuperclassesDo:[:scls | 
                                         |sclsBaseName|
@@ -3460,7 +3460,7 @@
             addPackage value:(eachSuperClass package)
         ].
 
-        cls privateClassesDo:[:eachPrivateClass |
+        cls allPrivateClassesDo:[:eachPrivateClass |
             eachPrivateClass allSuperclassesDo:[:eachSuperClass | 
                 eachSuperClass isPrivate ifFalse:[
                     addPackage value:(eachSuperClass package)
@@ -3979,7 +3979,7 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.178 2008-03-31 13:49:56 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.179 2008-04-09 08:20:59 stefan Exp $'
 ! !
 
 ProjectDefinition initialize!