--- a/Label.st	Sun Oct 20 11:31:22 2019 +0200
+++ b/Label.st	Thu Oct 24 17:38:06 2019 +0200
@@ -1587,7 +1587,7 @@
             nextOffset := offset + 1.
         ] ifFalse:[
             nextOffset := offset - 2.
-            nextAnimationDelay := nextAnimationDelay / 4. "/ fast
+            nextAnimationDelay := nextAnimationDelay / 8. "/ fast
         ].    
     ].
 
@@ -1605,6 +1605,8 @@
 
     self invalidate.
     Processor addTimedBlock:(animatorState timedBlock) after:nextAnimationDelay.
+
+    "Modified: / 24-10-2019 / 10:35:25 / Stefan Vogel"
 !
 
 startAnimation