--- a/DirectoryContentsBrowser.st	Fri Nov 02 11:08:12 2007 +0100
+++ b/DirectoryContentsBrowser.st	Fri Nov 02 15:17:16 2007 +0100
@@ -2501,6 +2501,8 @@
 updateStep
     |timedOut sensor|
 
+    Processor yield.
+
     sensor := self windowGroup sensor.
     (sensor anyButtonPressed or:[sensor shiftDown]) ifTrue:[ 
         "/ no update while scrolling
@@ -2531,7 +2533,7 @@
 "/        ].
     ].
 
-    "Modified: / 12-12-2006 / 18:07:42 / cg"
+    "Modified: / 02-11-2007 / 13:08:37 / cg"
 !
 
 updateWithTimeout:timeOut
@@ -3263,5 +3265,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.207 2007-10-01 17:29:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.208 2007-11-02 14:17:16 cg Exp $'
 ! !