--- a/ProgressIndicator.st	Mon Mar 11 11:49:22 2019 +0100
+++ b/ProgressIndicator.st	Wed Mar 13 10:30:41 2019 +0100
@@ -615,7 +615,7 @@
 displayBusyIndicator:aLabel at:aPoint during:aBlock
     "easy interface - show progress while evaluating aBlock.
      The block is passed a valueHolder, which is to be set to values from
-     startValue to endValue during the blocks evaluation.
+     startValue to endValue during the block's evaluation.
      This is scaled to 0..100% completion.
      Set the valueHolder to nil, to get a busy-indicator"
 
@@ -635,6 +635,8 @@
             ]
         ].
     "
+
+    "Modified (comment): / 13-03-2019 / 10:26:23 / Claus Gittinger"
 !
 
 displayBusyIndicator:aLabel message:messageString abortable:abortable at:aPoint during:aBlock
@@ -697,7 +699,7 @@
 displayBusyIndicator:aLabel message:messageString at:aPoint during:aBlock
     "easy interface - show progress while evaluating aBlock.
      The block is passed a valueHolder, which is to be set to values from
-     startValue to endValue during the blocks evaluation.
+     startValue to endValue during the block's evaluation.
      This is scaled to 0..100% completion.
      Set the valueHolder to nil, to get a busy-indicator"
 
@@ -722,12 +724,13 @@
 
     "Created: / 12-11-2010 / 19:01:12 / cg"
     "Modified (comment): / 11-07-2018 / 10:40:31 / Stefan Vogel"
+    "Modified (comment): / 13-03-2019 / 10:26:28 / Claus Gittinger"
 !
 
 displayProgress:aLabel at:aPoint from:startValue to:endValue during:aBlock
     "easy interface - show progress while evaluating aBlock.
      The block is passed a valueHolder, which is to be set to values from
-     startValue to endValue during the blocks evaluation.
+     startValue to endValue during the block's evaluation.
      This is scaled to 0..100% completion.
      Set the valueHolder to nil, to get a busy-indicator"
 
@@ -753,12 +756,13 @@
     "
 
     "Modified: / 12-11-2010 / 19:02:27 / cg"
+    "Modified (comment): / 13-03-2019 / 10:26:31 / Claus Gittinger"
 !
 
 displayProgress:aLabel message:messageString at:aPoint from:startValue to:endValue during:aBlock
     "easy interface - show progress while evaluating aBlock.
      The block is passed a valueHolder, which is to be set to values from
-     startValue to endValue during the blocks evaluation.
+     startValue to endValue during the block's evaluation.
      This is scaled to 0..100% completion.
      Set the valueHolder to nil, to get a busy-indicator"
 
@@ -816,6 +820,7 @@
     "
 
     "Created: / 12-11-2010 / 19:01:38 / cg"
+    "Modified (comment): / 13-03-2019 / 10:26:34 / Claus Gittinger"
 !
 
 displayProgressNotifications:aLabel abortable:abortable at:aPointOrNil during:aBlock