--- a/Autoload.st	Wed May 13 23:37:11 1998 +0200
+++ b/Autoload.st	Wed May 13 23:38:30 1998 +0200
@@ -367,18 +367,11 @@
     ObjectMemory flushCaches.
     LoadedClasses rehash.
 
-    (newClass class implements:#initialize) ifTrue:[
-        newClass initialize.
-    ].
-    newClass privateClassesDo:[:aPrivateClass |
-        (aPrivateClass class implements:#initialize) ifTrue:[
-            aPrivateClass initialize.
-        ]
-    ].
+    newClass initializeWithAllPrivateClasses.
     newClass postAutoload.
     ^ newClass
 
-    "Modified: / 3.2.1998 / 18:30:13 / cg"
+    "Modified: / 13.5.1998 / 23:38:04 / cg"
 ! !
 
 !Autoload class methodsFor:'message catching'!
@@ -597,6 +590,6 @@
 !Autoload class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.79 1998-02-16 12:03:47 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.80 1998-05-13 21:38:30 cg Exp $'
 ! !
 Autoload initialize!