--- a/Autoload.st	Mon Oct 16 11:14:31 2006 +0200
+++ b/Autoload.st	Mon Oct 16 16:58:24 2006 +0200
@@ -529,13 +529,13 @@
 
     self ~~ Autoload ifTrue:[
         newClass := self autoload.
-        newClass notNil ifTrue:[
+        (newClass notNil and:[newClass isLoaded]) ifTrue:[
             ^ aMessage sendTo:newClass
         ]
     ].
     ^ super doesNotUnderstand:aMessage
 
-    "Modified: 24.4.1996 / 19:53:27 / cg"
+    "Modified: / 16-10-2006 / 16:52:20 / cg"
 !
 
 error
@@ -906,7 +906,7 @@
 !Autoload class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.140 2006-10-06 14:24:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.141 2006-10-16 14:58:24 cg Exp $'
 ! !
 
 Autoload initialize!