Autoload.st
changeset 1148 9f69b4df970b
parent 938 a23bc7f62ed1
child 1266 cef9b3cd49df
--- a/Autoload.st	Tue Apr 09 22:51:54 1996 +0200
+++ b/Autoload.st	Wed Apr 10 08:53:48 1996 +0200
@@ -295,11 +295,13 @@
     ObjectMemory flushCaches.
     LoadedClasses rehash.
 
-    newClass initialize.
+    (newClass class implements:#initialize) ifTrue:[
+        newClass initialize.
+    ].
     newClass postAutoload.
     ^ newClass
 
-    "Modified: 7.2.1996 / 14:38:57 / cg"
+    "Modified: 10.4.1996 / 08:52:47 / cg"
 ! !
 
 !Autoload class methodsFor:'message catching'!
@@ -412,6 +414,6 @@
 !Autoload class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.42 1996-02-07 14:10:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.43 1996-04-10 06:53:48 cg Exp $'
 ! !
 Autoload initialize!