--- a/Class.st Tue Jul 22 17:45:25 1997 +0200
+++ b/Class.st Wed Jul 23 09:47:11 1997 +0200
@@ -2019,13 +2019,13 @@
self fileOutAs:fileNameString.
- "
- add a change record; that way, administration is much easier,
- since we can see in that changeBrowser, which changes have
- already found their way into a sourceFile and which must be
- applied again
- "
- self addChangeRecordForClassFileOut:self
+"/ "
+"/ add a change record; that way, administration is much easier,
+"/ since we can see in that changeBrowser, which changes have
+"/ already found their way into a sourceFile and which must be
+"/ applied again
+"/ "
+"/ self addChangeRecordForClassFileOut:self
"Modified: 7.6.1996 / 09:14:43 / stefan"
"Modified: 16.4.1997 / 20:45:33 / cg"
@@ -3791,5 +3791,5 @@
!Class class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.286 1997-06-26 09:47:32 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.287 1997-07-23 07:47:11 ca Exp $'
! !