#REFACTORING by exept
authorClaus Gittinger <cg@exept.de>
Sun, 23 Feb 2020 16:35:34 +0100
changeset 4557 069040b49bec
parent 4556 153115221513
child 4558 3d5a033d3b5d
#REFACTORING by exept class: CVSSourceCodeManager class changed: #revisionInfoFromString:inClass:
CVSSourceCodeManager.st
--- a/CVSSourceCodeManager.st	Sun Feb 23 14:39:35 2020 +0100
+++ b/CVSSourceCodeManager.st	Sun Feb 23 16:35:34 2020 +0100
@@ -4803,7 +4803,7 @@
             "/ temporary fix translated (-sign) and not restored strings:
             (aString startsWith:'Header: ') ifTrue:[
                 (aString endsWith:'Exp ') ifTrue:[
-                    fixedString := '$' , (aString copyFrom:2 to:(aString size - 1)) , '$'.
+                    fixedString := '$' , (aString copyButFirstAndLast) , '$'.
 
                     aClass isNil ifTrue:[
                         autoFixHolder value ifFalse:[