--- a/Class.st Sat Dec 09 15:57:29 1995 +0100
+++ b/Class.st Sat Dec 09 15:58:25 1995 +0100
@@ -10,7 +10,7 @@
hereby transferred.
"
-!ClassDescription subclass:#Class
+ClassDescription subclass:#Class
instanceVariableNames:'classvars comment subclasses classFilename package revision
history'
classVariableNames:'UpdatingChanges LockChangesFile FileOutErrorSignal
@@ -2341,7 +2341,7 @@
copyrightText := copyrightText copyFrom:2 to:(copyrightText size).
"/ copyrightText do:[:line | aStream nextPutAll:line. aStream cr.].
copyrightText := copyrightText asString.
- aStream nextChunkPut:copyrightText.
+ aStream nextPutAllAsChunk:copyrightText.
].
stampIt ifTrue:[
@@ -2456,7 +2456,7 @@
]
"Created: 15.11.1995 / 12:53:06 / cg"
- "Modified: 9.12.1995 / 15:38:31 / cg"
+ "Modified: 9.12.1995 / 15:54:40 / cg"
!
fileOutPrimitiveDefinitionsOn:aStream
@@ -3358,6 +3358,6 @@
!Class class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.101 1995-12-09 14:46:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.102 1995-12-09 14:58:25 cg Exp $'
! !
Class initialize!