Notification.st
changeset 13363 070b1c3087bc
parent 12277 29a16650c9f4
child 13674 89734bcfdb32
--- a/Notification.st	Thu May 05 16:28:34 2011 +0200
+++ b/Notification.st	Mon May 09 10:22:54 2011 +0200
@@ -234,6 +234,8 @@
     con := Context findFirstSpecialHandle:true raise:false.
     [con notNil] whileTrue:[
         (con selector ~~ #answer:do:) ifTrue:[
+            "there is another handler block, maybe it will return the answer.
+             Call it via raiseRequest"
             ^ super raiseRequest
         ].
         signal := con receiver.
@@ -338,11 +340,11 @@
 !Notification class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.25 2009-10-14 17:34:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.26 2011-05-09 08:22:54 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.25 2009-10-14 17:34:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.26 2011-05-09 08:22:54 stefan Exp $'
 ! !
 
 Notification initialize!