--- a/ClassCommentChange.st Wed Jun 18 17:44:02 2003 +0200
+++ b/ClassCommentChange.st Wed Jun 18 17:44:33 2003 +0200
@@ -89,7 +89,7 @@
source
"synthesize the changes source"
- ^ self className , ' comment: ' , comment storeString
+ ^ self nameSpaceName , '::' , self className , ' comment: ' , comment storeString
! !
!ClassCommentChange methodsFor:'printing & storing'!
@@ -98,7 +98,7 @@
"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:'
+ aStream nextPutAll:self nameSpaceName , '::' , self className; nextPutAll:' comment:'
!
printWithoutClassNameOn:aStream
@@ -119,5 +119,5 @@
!ClassCommentChange class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.28 2003-01-26 14:05:31 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.29 2003-06-18 15:44:33 cg Exp $'
! !