--- a/QuerySignal.st Fri Apr 19 09:38:48 2013 +0200
+++ b/QuerySignal.st Tue Apr 23 14:27:19 2013 +0100
@@ -414,7 +414,7 @@
|signal|
- signal := anException signal.
+ signal := anException creator.
self == signal ifTrue:[^ true]. "quick check"
anException isNotification ifFalse:[^ false]. "speed up non-queries by not traversing the parent chain"
@@ -510,9 +510,10 @@
!QuerySignal class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.45 2011-07-29 17:59:07 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.46 2013-04-19 08:41:25 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.45 2011-07-29 17:59:07 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.46 2013-04-19 08:41:25 cg Exp $'
! !
+