MethodRemoveChange.st
changeset 2121 fd9eb290be9f
parent 2047 ad2ebab696ac
child 2133 2d8d2ea0a62e
--- a/MethodRemoveChange.st	Fri Sep 18 14:44:06 2009 +0200
+++ b/MethodRemoveChange.st	Fri Sep 18 18:15:56 2009 +0200
@@ -85,6 +85,15 @@
     self assert:typeSymbol == #remove.
 ! !
 
+!MethodRemoveChange methodsFor:'applying'!
+
+apply
+
+    ^self changeClass removeSelector: self changeSelector
+
+    "Created: / 12-12-2007 / 08:55:26 / janfrog"
+! !
+
 !MethodRemoveChange methodsFor:'printing'!
 
 printOn:aStream
@@ -105,5 +114,5 @@
 !MethodRemoveChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/MethodRemoveChange.st,v 1.10 2008-11-03 11:21:07 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/MethodRemoveChange.st,v 1.11 2009-09-18 16:15:56 cg Exp $'
 ! !