--- a/ApplicationModel.st	Thu Feb 04 10:35:35 2016 +0100
+++ b/ApplicationModel.st	Thu Feb 04 10:38:37 2016 +0100
@@ -2067,6 +2067,26 @@
 
     "Created: / 26-02-2000 / 18:01:31 / cg"
     "Modified: / 23-03-2011 / 19:46:41 / cg"
+!
+
+enqueueMessage:selector with:argument 
+    "enqueue a message with one argument 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)"
+
+    self enqueueMessage:selector for:self arguments:{ argument }
+!
+
+enqueueMessage:selector with:argument1 with:argument2
+    "enqueue a message with one argument 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)"
+
+    self enqueueMessage:selector for:self arguments:{ argument1. argument2 }
 ! !
 
 !ApplicationModel methodsFor:'drag & drop'!