--- a/Filename.st	Sun Mar 17 17:41:36 2019 +0100
+++ b/Filename.st	Mon Mar 18 11:48:04 2019 +0100
@@ -6992,7 +6992,8 @@
 !
 
 writingFileDo:aBlock
-    "create a write-stream on the receiver file, evaluate aBlock, passing that stream as arg,
+    "create a write-stream on the receiver file, evaluate aBlock, 
+     passing that stream as arg,
      and return the block's value.
      If the file cannot be opened, an exception is raised.
      Ensures that the stream is closed."
@@ -7015,6 +7016,7 @@
 
     "Created: / 11-12-2006 / 14:09:39 / cg"
     "Modified: / 06-02-2019 / 11:37:37 / Stefan Vogel"
+    "Modified (comment): / 18-03-2019 / 11:29:44 / Claus Gittinger"
 ! !
 
 !Filename class methodsFor:'documentation'!