--- a/MethodChange.st	Mon Feb 16 15:41:25 2009 +0100
+++ b/MethodChange.st	Mon Feb 16 18:09:53 2009 +0100
@@ -167,7 +167,8 @@
 
     class := self changeClass.
     class isNil ifTrue:[
-        self error:('Cannot apply change for missing class: ' , className).
+        self error:('Cannot apply change for missing class: ' , className) mayProceed:true.
+        ^ self
     ].
     class compile:source classified:methodCategory logged:true.
 ! !
@@ -275,5 +276,5 @@
 !MethodChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.46 2008-10-20 14:53:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.47 2009-02-16 17:09:53 cg Exp $'
 ! !