--- a/ClassCommentChange.st Mon Aug 25 12:06:43 2003 +0200
+++ b/ClassCommentChange.st Tue Aug 26 17:53:41 2003 +0200
@@ -103,12 +103,12 @@
"append a user printed representation of the receiver to aStream.
The format is suitable for a human - not meant to be read back."
- |ns|
-
- ns := self nameSpaceName.
- ns notNil ifTrue:[
- aStream nextPutAll:ns; nextPutAll:'::'
- ].
+"/ |ns|
+"/
+"/ ns := self nameSpaceName.
+"/ ns notNil ifTrue:[
+"/ aStream nextPutAll:ns; nextPutAll:'::'
+"/ ].
aStream nextPutAll:self className; nextPutAll:' comment:'
!
@@ -130,5 +130,5 @@
!ClassCommentChange class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.30 2003-08-25 10:05:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.31 2003-08-26 15:53:41 cg Exp $'
! !