--- a/MethodChange.st	Mon Jan 13 14:12:55 2014 +0100
+++ b/MethodChange.st	Thu Jan 23 17:11:18 2014 +0100
@@ -267,7 +267,7 @@
                 replacementClassName := Dialog 
                                 requestClassName:('Cannot apply change for missing class: %1\\Use replacement class (or press cancel)' bindWith:className) withCRs
                                 initialAnswer:suggestion.
-                replacementClassName isNil ifTrue:[ AbortSignal raise ].
+                replacementClassName isNil ifTrue:[ AbortOperationRequest raise ].
 
                 (replacementClassName isEmptyOrNil
                 or:[ (class := Smalltalk classNamed:replacementClassName) isNil]) ifTrue:[
@@ -490,14 +490,14 @@
 !MethodChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.73 2013-04-14 11:33:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.74 2014-01-23 16:11:18 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.73 2013-04-14 11:33:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.74 2014-01-23 16:11:18 stefan Exp $'
 !
 
 version_SVN
-    ^ '§Id: MethodChange.st 1940 2012-07-26 15:09:40Z vranyj1 §'
+    ^ '$Id: MethodChange.st,v 1.74 2014-01-23 16:11:18 stefan Exp $'
 ! !