--- a/ClassCommentChange.st	Mon Jul 05 22:28:21 1999 +0200
+++ b/ClassCommentChange.st	Mon Jul 05 22:29:00 1999 +0200
@@ -59,13 +59,12 @@
 !ClassCommentChange methodsFor:'printing'!
 
 printOn:aStream
-    aStream nextPutAll:'ClassCommentChange(';
-	    nextPutAll:className;
-	    nextPutAll:')'
+    aStream nextPutAll:className;
+            nextPutAll:' comment:'
 ! !
 
 !ClassCommentChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.13 1998-02-16 13:59:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.14 1999-07-05 20:29:00 cg Exp $'
 ! !