Autoload.st
branchjv
changeset 17756 f4d72b8d0d89
parent 17751 b2273fa8d59f
child 17761 b0e5971141bc
--- a/Autoload.st	Sun Mar 21 17:58:43 2010 +0000
+++ b/Autoload.st	Sun Mar 21 19:37:43 2010 +0000
@@ -443,7 +443,9 @@
         " 
         AutoloadFailedSignal
             raiseRequestWith:self
-            errorString:('autoload of ' , myName , ' failed').
+            errorString:('autoload of %1 failed (%2)' 
+                            bindWith:myName 
+                            with:(newClass isNil ifTrue:['nil result'] ifFalse:['still unloaded'])).
         ^ nil
     ].
 
@@ -761,11 +763,11 @@
 !Autoload class methodsFor:'documentation'!
 
 version
-    ^ '$Id: Autoload.st 10501 2010-02-13 23:34:44Z vranyj1 $'
+    ^ '$Id: Autoload.st 10508 2010-03-21 19:37:43Z vranyj1 $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.156 2010/02/05 13:00:22 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.157 2010/03/13 11:36:57 cg Exp §'
 ! !
 
 Autoload initialize!
@@ -773,3 +775,4 @@
 
 
 
+