changed #printOn:
authorClaus Gittinger <cg@exept.de>
Fri, 31 Oct 2008 15:17:13 +0100
changeset 2045 3557b7c36af0
parent 2044 b6fb4928a750
child 2046 6d7bc535ea69
changed #printOn:
ClassInstVarDefinitionChange.st
--- a/ClassInstVarDefinitionChange.st	Fri Oct 31 14:23:09 2008 +0100
+++ b/ClassInstVarDefinitionChange.st	Fri Oct 31 15:17:13 2008 +0100
@@ -9,8 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
-
 "{ Package: 'stx:libbasic3' }"
 
 ClassChange subclass:#ClassInstVarDefinitionChange
@@ -62,7 +60,7 @@
 
 printOn:aStream
     "/ aStream nextPutAll:className; nextPutAll:' instanceVariableNames:'
-    aStream nextPutAll:source
+    aStream nextPutAll:source string
 
 
 ! !
@@ -78,5 +76,5 @@
 !ClassInstVarDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassInstVarDefinitionChange.st,v 1.5 2000-08-31 10:01:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassInstVarDefinitionChange.st,v 1.6 2008-10-31 14:17:13 cg Exp $'
 ! !