--- a/WindowGroup.st	Mon Aug 20 12:07:40 2018 +0200
+++ b/WindowGroup.st	Wed Aug 22 12:29:25 2018 +0200
@@ -1975,17 +1975,19 @@
     "process only pending expose events from the damage queue
      (for any of my views).
      This only handles true expose events - leaving map, unmap etc. in the queue.
-     This is required after a scroll operation,
+     This is required before/after a scroll operation,
      to wait for either a noExpose or a real expose."
 
     self processRealExposeEventsFor:nil
+
+    "Modified (comment): / 22-08-2018 / 10:10:10 / Claus Gittinger"
 !
 
 processRealExposeEventsFor:someViewOrNil
     "process only pending expose events from the damage queue
      (for any of my views if the arg is nil).
      This only handles true expose events - leaving map, unmap etc. in the queue.
-     This is required after a scroll operation,
+     This is required before/after a scroll operation,
      to wait for either a noExpose or a real expose."
 
     |sensor|
@@ -2026,6 +2028,7 @@
     "Created: / 02-07-1997 / 14:32:19 / cg"
     "Modified: / 05-04-1998 / 11:35:43 / cg"
     "Modified: / 13-04-2018 / 12:29:20 / stefan"
+    "Modified (comment): / 22-08-2018 / 10:10:22 / Claus Gittinger"
 !
 
 repairDamage