#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Fri, 21 Sep 2018 12:35:42 +0200
changeset 8477 7c740a230ff5
parent 8476 f5ecdc372432
child 8478 a4efe2621fa8
#BUGFIX by cg class: DisplaySurface changed: #dispatchEvent:type:arguments:withFocusOn:delegate: asnwer the current event
DisplaySurface.st
--- a/DisplaySurface.st	Thu Sep 20 11:34:20 2018 +0200
+++ b/DisplaySurface.st	Fri Sep 21 12:35:42 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1992 by Claus Gittinger
               All Rights Reserved
@@ -1783,11 +1781,13 @@
             selector := deviceMessage
         ]
     ].
-
-    eventReceiver perform:selector withArguments:argArray
+    WindowGroup lastEventQuerySignal answer:ev do:[
+        eventReceiver perform:selector withArguments:argArray
+    ].
 
     "Created: / 20-05-1998 / 22:46:25 / cg"
     "Modified: / 17-08-2017 / 09:47:01 / cg"
+    "Modified: / 21-09-2018 / 11:39:47 / Claus Gittinger"
 !
 
 dispatchEvent:event withFocusOn:focusViewOrNil