--- a/Signal.st	Mon Aug 02 17:02:49 1999 +0200
+++ b/Signal.st	Mon Aug 02 17:03:12 1999 +0200
@@ -479,17 +479,15 @@
 
     |con r|
 
-    con := aContext.
+    con := Context findFirstSpecialHandle:true raise:false.
     [con notNil] whileTrue:[
+        ((r := con receiver) notNil
+         and:[(r handlerForSignal:self context:con originator:nil) notNil]
+        ) ifTrue:[
+            "found a handler context"
+            ^ true
+        ].
         con := con findSpecialHandle:true raise:false.
-        con notNil ifTrue:[
-            ((r := con receiver) notNil
-             and:[(r handlerForSignal:self context:con originator:nil) notNil]
-            ) ifTrue:[
-                "found a handler context"
-                ^ true
-            ]
-        ]
     ].
     ^ false
 
@@ -839,6 +837,6 @@
 !Signal class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.59 1999-08-02 13:42:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.60 1999-08-02 15:03:12 cg Exp $'
 ! !
 Signal initialize!