--- a/DirectoryContentsBrowser.st	Fri Jul 09 19:14:26 2010 +0200
+++ b/DirectoryContentsBrowser.st	Fri Jul 09 20:02:53 2010 +0200
@@ -2518,7 +2518,9 @@
     "/ Processor yield.
 
     sensor := self windowGroup sensor.
-    (sensor anyButtonPressed or:[sensor shiftDown]) ifTrue:[ 
+    (sensor anyButtonPressed or:[sensor shiftDown]) ifTrue:[
+        Processor yield.
+
         "/ no update while scrolling
         timedOut := ( changeSema waitWithTimeoutMs:(self class updateTaskCyleTime) ) isNil.
         timedOut ifFalse:[changeSema signal].
@@ -2547,7 +2549,7 @@
 "/        ].
     ].
 
-    "Modified: / 02-11-2007 / 13:08:37 / cg"
+    "Modified: / 09-07-2010 / 19:43:12 / cg"
 !
 
 updateWithTimeout:timeOut
@@ -3316,9 +3318,9 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.232 2010-02-02 14:20:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.233 2010-07-09 18:02:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.232 2010-02-02 14:20:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.233 2010-07-09 18:02:53 cg Exp $'
 ! !