--- a/Autoload.st	Mon Sep 23 21:49:08 2002 +0200
+++ b/Autoload.st	Wed Sep 25 10:25:28 2002 +0200
@@ -461,6 +461,12 @@
     ^ 'not yet loaded'
 !
 
+copy
+    "catch copy - load the class and resend #copy to the real one"
+
+    ^ self doesNotUnderstand:(Message selector:#copy)
+!
+
 doesNotUnderstand:aMessage
     "caught a message; load the class and retry the message"
 
@@ -630,6 +636,7 @@
 !Autoload class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.113 2002-07-09 14:01:24 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Autoload.st,v 1.114 2002-09-25 08:25:28 penk Exp $'
 ! !
+
 Autoload initialize!