--- a/ProjectDefinition.st	Thu Aug 30 16:53:04 2007 +0200
+++ b/ProjectDefinition.st	Thu Aug 30 21:40:54 2007 +0200
@@ -1164,6 +1164,13 @@
     ^ self classNamesForWhich:[:nm :attr | true ].
 !
 
+autoloaded_classNames          
+    ^ self classNamesForWhich:[:nm :attr | attr notEmptyOrNil and:[attr includes:#autoload]].
+
+    "Modified: / 07-08-2006 / 21:25:25 / fm"
+    "Created: / 30-08-2007 / 18:48:09 / cg"
+!
+
 classNames          
     "answer an array containing all the class names of the project's classes.
      A correponding method with real names is generated in my subclasses"
@@ -3803,7 +3810,7 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.161 2007-05-30 12:48:07 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.162 2007-08-30 19:40:54 cg Exp $'
 ! !
 
 ProjectDefinition initialize!