--- a/AbstractSourceCodeManager.st	Mon Jan 18 06:55:12 2016 +0100
+++ b/AbstractSourceCodeManager.st	Wed Jan 20 23:06:54 2016 +0000
@@ -2576,7 +2576,7 @@
 
     |versionString|
 
-    versionString := aString copyWithout: $.
+    versionString := aString copyWithout: $$.
     ^ self ensureKeywordExpansionWith: $$ inVersionMethod:versionString.
 
     "
@@ -2588,6 +2588,8 @@
      self ensureDollarsInVersionMethod:'foo ^ ''$Head'' '    
      self ensureDollarsInVersionMethod:'foo ^ ''Header$'' '    
     "
+
+    "Modified: / 20-01-2016 / 22:58:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 ensureKeyword: keyword inVersionMethod: source