--- a/CVSSourceCodeManager.st	Mon Sep 04 17:38:59 2017 +0200
+++ b/CVSSourceCodeManager.st	Thu Sep 21 10:54:40 2017 +0200
@@ -1316,7 +1316,7 @@
         record := CVSVersionInfo "IdentityDictionary" new.
         record at:#revision put:(revLine1 asCollectionOfWords at:2).
         "/ decompose date/author/state etc.
-        (revLine2 asCollectionOfSubstringsSeparatedBy:$;) do:[:info |
+        revLine2 asCollectionOfSubCollectionsSeparatedBy:$; do:[:info |
             |subEntry|
             subEntry := info withoutSeparators.
             #('date:'   #date
@@ -1357,6 +1357,8 @@
         record at:#logMessage put:s.
     ].
     ^record.
+
+    "Modified: / 20-09-2017 / 20:16:45 / stefan"
 !
 
 releaseAndRemove:tempdir module:moduleDir outputTo:outputFilename