--- a/Class.st Thu Nov 07 19:54:49 1996 +0100
+++ b/Class.st Thu Nov 07 20:55:58 1996 +0100
@@ -1122,8 +1122,11 @@
CatchMethodRedefinitions to false
(also found in the Launchers 'settings-misc' menu)
"
- MethodRedefinitionSignal
- raiseErrorString:('redefinition of ' , name , '>>' , newSelector)
+ MethodRedefinitionSignal
+ raiseRequestWith:(oldMethod -> newMethod)
+ errorString:('redefinition of ' , name , '>>' , newSelector)
+
+ "/ if proceeded, install as usual.
]
]
].
@@ -1142,7 +1145,7 @@
"Created: 29.10.1995 / 19:42:42 / cg"
"Modified: 9.9.1996 / 22:39:32 / stefan"
- "Modified: 7.11.1996 / 18:49:43 / cg"
+ "Modified: 7.11.1996 / 20:50:03 / cg"
!
basicAddSelector:newSelector withMethod:newMethod
@@ -4447,6 +4450,6 @@
!Class class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.209 1996-11-07 18:08:20 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.210 1996-11-07 19:55:58 cg Exp $'
! !
Class initialize!