--- a/ProjectDefinition.st Mon Oct 23 16:05:18 2006 +0200
+++ b/ProjectDefinition.st Mon Oct 23 16:19:59 2006 +0200
@@ -591,17 +591,16 @@
!
installAutoloadedClasses
- self classNamesForWhich:[:nm :attr |
- (attr includes:#autoload) ifTrue:[
- (Smalltalk classNamed:nm) isNil ifTrue:[
+ (self classNamesForWhich:[:nm :attr | (attr includes:#autoload)])
+ do:[:className |
+ (Smalltalk classNamed:className) isNil ifTrue:[
Smalltalk
- installAutoloadedClassNamed:nm
+ installAutoloadedClassNamed:className
category:'* unknown category *'
package:self package
revision:nil
].
].
- ]
"
stx_libbasic installAutoloadedClasses
@@ -3403,7 +3402,7 @@
!ProjectDefinition class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.101 2006-10-23 14:05:18 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.102 2006-10-23 14:19:59 cg Exp $'
! !
ProjectDefinition initialize!