class: Notification
authorClaus Gittinger <cg@exept.de>
Wed, 26 Mar 2014 22:12:16 +0100
changeset 16283 f5d92aa70835
parent 16282 a9cd85c4d2f2
child 16284 6eb367d12be5
class: Notification changed: #notify:
Notification.st
--- a/Notification.st	Wed Mar 26 14:02:34 2014 +0100
+++ b/Notification.st	Wed Mar 26 22:12:16 2014 +0100
@@ -220,7 +220,11 @@
     "raise the query - return the handler's value, or the default
      value, if there is no handler."
 
-    ^ self raiseRequestErrorString:aMessageString
+    "/ cg: must be redefined, so we get a reasonable originator
+    "/ some apps depend on aoriginator being the non-exception context here.
+    "/ (do not do a self raiseRequestErrorString: here)
+    ^ self basicNew
+        raiseRequestErrorString:aMessageString in:thisContext sender
 !
 
 query
@@ -356,11 +360,11 @@
 !Notification class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.33 2013-12-06 13:20:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.34 2014-03-26 21:12:16 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.33 2013-12-06 13:20:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Notification.st,v 1.34 2014-03-26 21:12:16 cg Exp $'
 ! !