--- a/ClassBuilder.st Tue Apr 12 19:15:40 2005 +0200
+++ b/ClassBuilder.st Tue Apr 12 19:17:19 2005 +0200
@@ -1091,7 +1091,7 @@
"/ this forces recompilation (recursively) if needed
"/ (dont update change file for the subclass changes)
- Class classRedefinitionSignal answer:#keep do:[
+ Class classRedefinitionNotification answer:#keep do:[
Class withoutUpdatingChangesDo:[
oldClass subclasses copy do:[:aClass |
aClass superclass:newClass
@@ -1713,7 +1713,7 @@
pkg := Class packageQuerySignal query.
oldPkg ~= pkg ifTrue:[
newClass package:pkg.
- answer := Class classRedefinitionSignal
+ answer := Class classRedefinitionNotification
raiseRequestWith:(oldClass -> newClass)
errorString:('redefinition of class: ' , oldClass name).
answer == #keep ifTrue:[
@@ -2040,5 +2040,5 @@
!ClassBuilder class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ClassBuilder.st,v 1.44 2005-03-01 17:12:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ClassBuilder.st,v 1.45 2005-04-12 17:16:24 stefan Exp $'
! !