--- a/ClassCommentChange.st	Thu Jul 15 21:43:46 1999 +0200
+++ b/ClassCommentChange.st	Thu Jul 15 21:47:01 1999 +0200
@@ -81,6 +81,9 @@
 !ClassCommentChange methodsFor:'printing'!
 
 printOn:aStream
+    "append a user printed representation of the receiver to aStream.
+     The format is suitable for a human - not meant to be read back."
+
     aStream nextPutAll:className;
             nextPutAll:' comment:'
 !
@@ -103,5 +106,5 @@
 !ClassCommentChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.20 1999-07-12 12:06:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.21 1999-07-15 19:46:54 cg Exp $'
 ! !