--- 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 $'
! !