class: Notification
authorStefan Vogel <sv@exept.de>
Mon, 27 May 2013 16:12:02 +0200
changeset 15285 7c7d4ed8296d
parent 15284 4cb1f1712ea2
child 15286 83f48c5b9ed9
class: Notification changed: #defaultAction no direct access to instance variable 'signal'
Notification.st
--- a/Notification.st	Mon May 27 15:23:58 2013 +0200
+++ b/Notification.st	Mon May 27 16:12:02 2013 +0200
@@ -304,7 +304,7 @@
     "try per signal handler.
      I may have been created from a QuerySignal"
 
-    (handlerBlock := signal handlerBlock) notNil ifTrue:[
+    (handlerBlock := self creator handlerBlock) notNil ifTrue:[
         "... and call it"
         ^ handlerBlock value:self.
     ].
@@ -375,11 +375,11 @@
 !Notification class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.29 2013-04-19 08:41:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.30 2013-05-27 14:12:02 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.29 2013-04-19 08:41:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.30 2013-05-27 14:12:02 stefan Exp $'
 ! !