--- a/ProjectDefinition.st	Wed Aug 23 16:43:05 2006 +0200
+++ b/ProjectDefinition.st	Wed Aug 23 16:50:17 2006 +0200
@@ -13,10 +13,10 @@
 "{ Package: 'stx:libbasic' }"
 
 Object subclass:#ProjectDefinition
-	instanceVariableNames:''
-	classVariableNames:''
-	poolDictionaries:''
-	category:'System-Support-Projects'
+        instanceVariableNames:''
+        classVariableNames:''
+        poolDictionaries:''
+        category:'System-Support-Projects'
 !
 
 ProjectDefinition class instanceVariableNames:'overwrittenMethods'
@@ -945,7 +945,7 @@
 
             addEntry := 
                 [:eachClassName | 
-                    |cls fn wasLoaded|
+                    |cls fn wasLoaded numClassInstvars|
 
                     s nextPutAll:eachClassName.
                     s nextPutAll:' '.
@@ -968,7 +968,8 @@
                         ].
                         s nextPutAll:' '; nextPutAll:(cls package); nextPutAll:' '.
                         s nextPutAll: (cls category asString storeString).
-                        s nextPutAll:' '; nextPutAll:(cls theMetaclass instVarNames size) printString.
+                        numClassInstvars := cls theMetaclass instSize - Class instSize.
+                        s nextPutAll:' '; nextPutAll:numClassInstvars printString.
 
                         wasLoaded ifFalse:[
                             cls unload
@@ -992,7 +993,7 @@
     "
 
     "Created: / 09-08-2006 / 11:24:39 / fm"
-    "Modified: / 22-08-2006 / 18:30:48 / cg"
+    "Modified: / 23-08-2006 / 16:49:42 / cg"
 !
 
 generate_bc_dot_def                         
@@ -1818,5 +1819,5 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.34 2006-08-23 14:43:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.35 2006-08-23 14:50:17 cg Exp $'
 ! !