--- a/ClassBuilder.st Sun Dec 27 19:45:23 2009 +0000
+++ b/ClassBuilder.st Sun Dec 27 20:16:54 2009 +0000
@@ -1834,6 +1834,7 @@
pkg == PackageId noProjectID ifTrue:[
pkg := oldPkg.
] ifFalse:[
+ newClass setPackage:pkg. "/ so the notification handler knows, what we are talking about
answer := Class classRedefinitionNotification
raiseRequestWith:(oldClass -> newClass)
errorString:('redefinition of class: ' , oldClass name).
@@ -2208,12 +2209,13 @@
!ClassBuilder class methodsFor:'documentation'!
version
- ^ '$Id: ClassBuilder.st 10482 2009-12-04 20:30:11Z vranyj1 $'
+ ^ '$Id: ClassBuilder.st 10489 2009-12-27 20:16:54Z vranyj1 $'
!
version_CVS
- ^ '§Header: /cvs/stx/stx/libbasic/ClassBuilder.st,v 1.87 2009/11/30 16:01:04 cg Exp §'
+ ^ '§Header: /cvs/stx/stx/libbasic/ClassBuilder.st,v 1.88 2009/12/11 09:27:16 cg Exp §'
! !
+