ApplicationModel.st
changeset 1379 fc637aed5a94
parent 1378 1fa42c9a3e24
child 1382 77effd3650fd
--- a/ApplicationModel.st	Tue Jul 18 11:08:32 2000 +0200
+++ b/ApplicationModel.st	Tue Jul 18 13:22:06 2000 +0200
@@ -1028,7 +1028,7 @@
      #update:with:from: method.
      This will enqueue a delayed update, and resend #delayedUpdate:with:from:
      whenever the receiver is handling events.
-     Especially useful, if many updates arrive at high frequenc, to avoid
+     Especially useful, if many updates arrive at high frequency, to avoid
      multiple redraws."
 
     ^ self
@@ -1043,6 +1043,12 @@
 !
 
 enqueueMessage:selector for:someone arguments:argList
+    "enqueue a message to be sent to myself later, when my process
+     is back in its eventLoop. Also, filter duplicates.
+     This is useful, to buffer redraws and avoid flicker due to multiple
+     redraws (especially in browsers, when reacting on changeMessages resulting
+     from changes made in other browsers)"
+
     |window sensor|
 
     (window := self window) notNil ifTrue:[
@@ -1055,8 +1061,9 @@
     ].
 
     "/
-    "/ if such an update is already in the queue, ignore it.
-    "/ Otherwise push it as an event, to be handled when I am back
+    "/ if such a message is already in the queue, ignore it.
+    "/ Otherwise push it as an event, to be handled when my thread is
+    "/ back in the event loop.
     "/
     (sensor 
       hasEvent:selector
@@ -2395,6 +2402,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.135 2000-07-18 09:08:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.136 2000-07-18 11:22:06 cg Exp $'
 ! !
 ApplicationModel initialize!