ClassDefinitionChange.st
changeset 1998 06004ad8a6e4
parent 1956 45c24d58e47e
child 2044 b6fb4928a750
--- a/ClassDefinitionChange.st	Mon Jun 23 17:53:05 2008 +0200
+++ b/ClassDefinitionChange.st	Fri Jul 04 17:43:00 2008 +0200
@@ -202,6 +202,15 @@
     ^ nm
 ! !
 
+!ClassDefinitionChange methodsFor:'applying'!
+
+apply
+    super apply.
+    package notNil ifTrue:[
+        self changeClass setPackage:package.
+    ].
+! !
+
 !ClassDefinitionChange methodsFor:'comparing'!
 
 isForSameAs:changeB
@@ -428,5 +437,5 @@
 !ClassDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.47 2007-03-05 10:26:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.48 2008-07-04 15:43:00 stefan Exp $'
 ! !