improved scrollbar delay behavior -- jvr
diff --git a/Mac/Tools/IDE/Wcontrols.py b/Mac/Tools/IDE/Wcontrols.py
index c5511d4..7add904 100644
--- a/Mac/Tools/IDE/Wcontrols.py
+++ b/Mac/Tools/IDE/Wcontrols.py
@@ -305,8 +305,11 @@
self._control.HiliteControl(part)
self._hit(part)
oldpart = part
- import time
- time.sleep(0.3)
+ # slight delay before scrolling at top speed...
+ now = Evt.TickCount()
+ while Evt.StillDown():
+ if (Evt.TickCount() - now) > 18: # 0.3 seconds
+ break
while Evt.StillDown():
part = self._control.TestControl(point)
if part == oldpart: