--- a/DoItChange.st	Mon Feb 04 10:39:04 2002 +0100
+++ b/DoItChange.st	Wed Feb 06 10:09:31 2002 +0100
@@ -37,6 +37,14 @@
 
 ! !
 
+!DoItChange methodsFor:'applying'!
+
+apply
+    "apply the change"
+
+    Compiler evaluate:source.
+! !
+
 !DoItChange methodsFor:'comparing'!
 
 isInitialize
@@ -66,5 +74,5 @@
 !DoItChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/DoItChange.st,v 1.6 2001-01-17 17:12:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/DoItChange.st,v 1.7 2002-02-06 09:09:31 cg Exp $'
 ! !