#REFACTORING by stefan
class: QuerySignal
changed: #handles: (send #isQuery instead of #isNotification)
--- a/QuerySignal.st Tue Jul 25 17:32:21 2017 +0200
+++ b/QuerySignal.st Tue Jul 25 17:35:43 2017 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1995 by Claus Gittinger
All Rights Reserved
@@ -418,13 +420,15 @@
signal := anException creator.
- self == signal ifTrue:[^ true]. "quick check"
- anException isNotification ifFalse:[^ false]. "speed up non-queries by not traversing the parent chain"
+ self == signal ifTrue:[^ true]. "quick check"
+ anException isQuery ifFalse:[^ false]. "speed up non-queries by not traversing the parent chain"
[(signal := signal parent) notNil] whileTrue:[
self == signal ifTrue:[^ true].
].
^ false
+
+ "Modified (format): / 25-07-2017 / 16:11:00 / stefan"
!
isQuery