diff -r 003c8edae743 -r d74b4c895376 Class.st --- a/Class.st Tue Feb 01 21:26:23 2000 +0100 +++ b/Class.st Tue Feb 01 22:52:44 2000 +0100 @@ -2771,6 +2771,9 @@ "append a class-comment-record to aStream" aClass fileOutCommentOn:aStream. + Project notNil ifTrue:[ + Project addClassCommentChangeFor:aClass + ] "Modified: 4.3.1996 / 16:49:08 / cg" ! @@ -2778,10 +2781,14 @@ addChangeRecordForClassInstvars:aClass to:aStream "{ Pragma: +optSpace }" - "append a class-instvars-record to aStream" + "append an instvars-record to aStream" aClass fileOutClassInstVarDefinitionOn:aStream withNameSpace:true. aStream nextPutChunkSeparator. + Project notNil ifTrue:[ + Project addInstVarDefinitionChangeFor:aClass class + ] + ! addChangeRecordForClassRemove:oldName to:aStream @@ -4048,5 +4055,5 @@ !Class class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.363 2000-01-17 11:25:36 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.364 2000-02-01 21:52:44 cg Exp $' ! !