MethodChange.st
branchjv
changeset 3434 a140fb9f5970
parent 3303 7ed5d48e3756
parent 3432 fad2a0fb4f99
child 3838 474d8ec95b33
--- a/MethodChange.st	Mon Jan 13 11:46:45 2014 +0000
+++ b/MethodChange.st	Sun Feb 02 14:26:36 2014 +0000
@@ -296,7 +296,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:[
@@ -526,11 +526,11 @@
 !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_HG
@@ -539,6 +539,6 @@
 !
 
 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 $'
 ! !