--- a/ExceptionHandlerSet.st	Fri Sep 06 16:09:52 2019 +0200
+++ b/ExceptionHandlerSet.st	Fri Sep 06 16:11:19 2019 +0200
@@ -161,7 +161,7 @@
     "Created: / 26.7.1999 / 11:29:29 / stefan"
 !
 
-handlerForSignal:signal context:theContext originator:originator
+handlerForSignal:exceptionCreator context:theContext originator:originator
     "answer the handler block for the signal from originator.
      The block is retrieved from aContext.
      Answer nil if the signal is not handled"
@@ -170,7 +170,7 @@
     (theContext selector ~~ #'handleDo:from:'
      or:[(theContext argAt:2) == originator]) ifTrue:[
         self keysAndValuesDo:[:sig :handler|
-            (sig == signal or:[sig accepts:signal]) ifTrue:[
+            (sig == exceptionCreator or:[sig accepts:exceptionCreator]) ifTrue:[
                 ^ handler ? [nil].
             ].
         ].
@@ -178,8 +178,8 @@
 
     ^ nil
 
-    "Created: / 26.7.1999 / 09:53:28 / stefan"
-    "Modified: / 26.7.1999 / 09:59:43 / stefan"
+    "Created: / 26-07-1999 / 09:53:28 / stefan"
+    "Modified (format): / 06-09-2019 / 15:48:19 / Stefan Reise"
 !
 
 handlerProtectedBlock:doBlock inContext:context