--- a/ClassDefinitionChange.st	Thu May 14 14:25:32 2009 +0200
+++ b/ClassDefinitionChange.st	Mon Jun 01 12:58:29 2009 +0200
@@ -205,7 +205,8 @@
 !ClassDefinitionChange methodsFor:'applying'!
 
 apply
-    super apply.
+    Parser evaluate:(self source).
+
     package notNil ifTrue:[
         self changeClass setPackage:package.
     ].
@@ -437,5 +438,5 @@
 !ClassDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.49 2008-10-31 13:23:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.50 2009-06-01 10:58:29 cg Exp $'
 ! !