--- a/DirectoryContentsBrowser.st	Thu Nov 25 10:20:53 2004 +0100
+++ b/DirectoryContentsBrowser.st	Thu Nov 25 13:49:12 2004 +0100
@@ -2414,12 +2414,13 @@
 !
 
 updateStep
-    |sensor|
+    |timedOut sensor|
 
     sensor := self windowGroup sensor.
     (sensor anyButtonPressed or:[sensor shiftDown]) ifTrue:[ 
         "/ no update while scrolling
-        self changeSema waitWithTimeoutMs:(self class updateTaskCyleTime).
+        timedOut := self changeSema waitWithTimeoutMs:(self class updateTaskCyleTime).
+        timedOut ifFalse:[self changeSema signal].
         ^ self 
     ].
     
@@ -2430,8 +2431,6 @@
         self filterChangeFlag:false.
         self sortBlockChangeFlag:false.
     ] do:[
-        | timedOut |
-
         self debugMessage:'sema wait'.
         timedOut := (self changeSema waitWithTimeoutMs:(self class updateTaskCyleTime)) isNil.
         self debugMessage:'timedOut:', timedOut asString.
@@ -3165,5 +3164,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.172 2004-11-25 09:20:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.173 2004-11-25 12:49:12 penk Exp $'
 ! !