--- a/MethodChange.st	Fri Nov 25 22:47:48 2011 +0100
+++ b/MethodChange.st	Sun Nov 27 13:29:49 2011 +0100
@@ -130,12 +130,12 @@
 
     self isMethodCodeChange ifFalse:[^super delta].
     mth := self changeMethod.
-    mth ifNil:[^#+].
+    mth isNil ifTrue:[^#+].
     ^(self class isSource: self source sameSourceAs: mth source)
         ifTrue:[#=]
         ifFalse:[#~]
 
-    "Modified (comment): / 31-08-2011 / 10:29:55 / cg"
+    "Modified: / 18-11-2011 / 14:48:50 / cg"
 !
 
 deltaDetail
@@ -441,7 +441,7 @@
 !MethodChange class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.63 2011-11-25 16:45:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.64 2011-11-27 12:29:49 cg Exp $'
 !
 
 version_SVN