--- a/StringCollection.st	Mon Mar 30 12:00:12 2020 +0200
+++ b/StringCollection.st	Tue Mar 31 11:13:00 2020 +0200
@@ -559,10 +559,10 @@
 
 !StringCollection methodsFor:'searching'!
 
-indexOfLineStartingWith:aString
+indexOfLineStartingWith:aStringOrCharacter
     "return the index of the first line starting with the argument, aString"
 
-    ^ self findFirst:[:l | l notNil and:[l startsWith:aString]] ifNone:0.
+    ^ self findFirst:[:l | l notNil and:[l startsWith:aStringOrCharacter]] ifNone:0.
 
 "/    |sz    "{ Class:SmallInteger }"      
 "/     l|
@@ -576,7 +576,8 @@
 "/    ].
 "/    ^ 0
 
-    "Modified: 24.2.1996 / 19:08:47 / cg"
+    "Modified: / 24-02-1996 / 19:08:47 / cg"
+    "Modified (format): / 31-03-2020 / 11:12:33 / Stefan Vogel"
 ! !
 
 !StringCollection methodsFor:'special converting'!