--- a/ext/ui/SimpleViewInteractor.st	Mon Jul 02 08:46:01 2018 +0200
+++ b/ext/ui/SimpleViewInteractor.st	Mon Sep 03 11:10:03 2018 +0100
@@ -192,11 +192,19 @@
     ]].
 
     wait ifTrue:[ 
-        Delay waitForMilliseconds: DefaultTypeWaitTime  
+        "/ Give some time to (external) window system to process
+        "/ events (for example, X server may need some time to catch
+        "/ up with new events and deliver them back to the application.
+        Delay waitForMilliseconds: DefaultTypeWaitTime.
+
+        "/ Now let's hope window system has delivered events back to
+        "/ Smalltalk/X. Synchronize on view's internal event queue
+        "/ (make sure all events are processed).
+        self wait.
     ].
 
     "Created: / 23-07-2014 / 07:35:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 12-07-2017 / 09:57:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 03-09-2018 / 11:07:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 wait