--- a/MethodChange.st	Wed Sep 09 16:28:50 2015 +0200
+++ b/MethodChange.st	Mon Sep 14 23:19:08 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	       All Rights Reserved
@@ -93,7 +91,7 @@
     |cls|
 
     cls := self changeClass.
-    cls isNil ifTrue:[^ nil].
+    (cls isNil or:[selector isNil]) ifTrue:[^ nil].
     ^ cls compiledMethodAt:selector asSymbol 
 
     "Created: / 7.2.1998 / 19:47:53 / cg"
@@ -545,14 +543,14 @@
 !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_SVN
-    ^ '$Id: MethodChange.st,v 1.80 2015-03-24 15:30:35 cg Exp $'
+    ^ '$Id$'
 ! !