--- a/ListView.st	Tue Feb 11 16:57:51 2020 +0100
+++ b/ListView.st	Tue Feb 11 18:03:23 2020 +0100
@@ -4277,6 +4277,17 @@
     "Modified: / 15-12-2010 / 10:12:41 / cg"
 !
 
+sceduleNextAutoScroll
+    |b t|
+
+    "/ care for a race in case any of autoScrollBlock/autoScrollDeltaT gets nilled in-between (via stopScrollSelect)
+    (b := autoScrollBlock) notNil ifTrue:[
+        (t := autoScrollDeltaT) notNil ifTrue:[
+            Processor addTimedBlock:b afterSeconds:t.
+        ]
+    ]
+!
+
 scrollDown
     "scroll down by one line; 
      this is called (among other) when the scrollbar's