*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Fri, 31 Jan 2003 15:12:58 +0100
changeset 1199 53f7de3f5c9b
parent 1198 4b6ac110497b
child 1200 2da3e026f94d
*** empty log message ***
MethodChange.st
--- a/MethodChange.st	Wed Jan 29 10:54:47 2003 +0100
+++ b/MethodChange.st	Fri Jan 31 15:12:58 2003 +0100
@@ -163,14 +163,10 @@
     "/ I am a methodChange - B must be as well.
     changeB isMethodChange ifFalse:[^ false].   
 
+    selector ~= changeB selector ifTrue:[^ false].
     className ~= changeB className ifTrue:[^ false].
-    selector ~= changeB selector ifTrue:[^ false].
 
     ^ true
-
-
-
-
 !
 
 sameAs:changeB
@@ -221,5 +217,5 @@
 !MethodChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.29 2003-01-26 14:05:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.30 2003-01-31 14:12:58 cg Exp $'
 ! !