Method.st
changeset 572 271607405bb8
parent 571 401f90539673
child 601 338404aae5ec
--- a/Method.st	Fri Nov 17 16:28:39 1995 +0100
+++ b/Method.st	Fri Nov 17 18:21:36 1995 +0100
@@ -36,7 +36,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.57 1995-11-17 15:28:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.58 1995-11-17 17:21:36 cg Exp $'
 !
 
 documentation
@@ -174,6 +174,8 @@
 !Method methodsFor:'copying'!
 
 copy
+    "redefined to change source ref into a real string"
+
     |aCopy|
 
     aCopy := super copy.