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.