--- a/ClassBuilder.st Thu Dec 10 21:57:54 2009 +0100
+++ b/ClassBuilder.st Fri Dec 11 10:27:16 2009 +0100
@@ -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,9 +2209,9 @@
!ClassBuilder class methodsFor:'documentation'!
version
- ^ '$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 $'
!
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 $'
! !