--- a/MethodChange.st	Fri Oct 02 10:46:50 2015 +0100
+++ b/MethodChange.st	Sun Oct 04 09:50:08 2015 +0100
@@ -92,7 +92,7 @@
 
     selector isNil ifTrue:[ ^ nil ].
     cls := self changeClass.
-    cls isNil ifTrue:[^ nil].
+    (cls isNil or:[selector isNil]) ifTrue:[^ nil].
     ^ cls compiledMethodAt:selector asSymbol
 
     "Created: / 07-02-1998 / 19:47:53 / cg"
@@ -531,11 +531,11 @@
 !MethodChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.80 2015-03-24 15:30:35 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.80 2015-03-24 15:30:35 cg Exp $'
+    ^ '$Header$'
 !
 
 version_HG
@@ -544,6 +544,6 @@
 !
 
 version_SVN
-    ^ '$Id: MethodChange.st,v 1.80 2015-03-24 15:30:35 cg Exp $'
+    ^ '$Id$'
 ! !