--- a/Metaclass.st Tue Oct 13 12:04:18 2009 +0200
+++ b/Metaclass.st Tue Oct 13 13:11:15 2009 +0200
@@ -64,7 +64,9 @@
!Metaclass class methodsFor:'class initialization'!
initialize
- ConfirmationQuerySignal := QuerySignal new defaultAnswer:true
+ ConfirmationQuerySignal isNil ifTrue:[
+ ConfirmationQuerySignal := Query newSignal defaultAnswer:true.
+ ].
"Modified: 31.7.1997 / 21:54:44 / cg"
! !
@@ -884,11 +886,11 @@
!Metaclass class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.206 2009-10-12 17:29:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.207 2009-10-13 11:11:15 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.206 2009-10-12 17:29:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.207 2009-10-13 11:11:15 stefan Exp $'
! !
Metaclass initialize!