--- 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 $'
! !