--- a/ClassCommentChange.st	Mon Jul 12 14:03:59 1999 +0200
+++ b/ClassCommentChange.st	Mon Jul 12 14:06:43 1999 +0200
@@ -62,10 +62,8 @@
     "return true, if the given change represents a change for the same
      thingy as the receiver (i.e. same method, same definition etc.)."
 
-    "/ I am a methodChange - B must be as well.
     changeB isClassCommentChange ifFalse:[^ false].   
-
-    ^ comment = changeB comment
+    ^ className = changeB className
 
 
 !
@@ -74,6 +72,7 @@
     "return true, if the given change represents the same change as the receiver."
 
     changeB isClassCommentChange ifFalse:[^ false].
+    className = changeB className ifFalse:[^ false].
     ^ comment = changeB comment 
 
 
@@ -104,5 +103,5 @@
 !ClassCommentChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.19 1999-07-06 10:51:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassCommentChange.st,v 1.20 1999-07-12 12:06:33 cg Exp $'
 ! !