--- a/Smalltalk.st	Fri Jul 25 15:57:49 2003 +0200
+++ b/Smalltalk.st	Fri Jul 25 16:07:12 2003 +0200
@@ -403,6 +403,7 @@
 
     self initializeModulesOnce.
     ClassesFailedToInitialize size > 0 ifTrue:[
+        ('Smalltalk [info]: retry initialization of failed class(es)...') infoPrintCR.
         ClassesFailedToInitialize := nil.
         self initializeModulesOnce.
         ClassesFailedToInitialize size > 0 ifTrue:[
@@ -6505,5 +6506,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.587 2003-07-25 13:57:28 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.588 2003-07-25 14:07:12 penk Exp $'
 ! !