--- a/CVSSourceCodeManager.st	Wed Feb 04 11:07:15 2015 +0100
+++ b/CVSSourceCodeManager.st	Wed Feb 04 13:18:45 2015 +0100
@@ -761,7 +761,7 @@
         "/
         "/ no Repository yet, create one
         "/
-        |index root|
+        |root|
 
         cvsRoot := self getCVSROOTForModule:aModule.
         cvsRoot isNil ifTrue:[ self error:'missing/invalid CVSROOT setting' ].
@@ -1494,7 +1494,7 @@
     rightPart := rightPart copyFrom:idx+1.
 
     "/ originalVersionString:
-    "/      '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.496 2015-01-25 00:26:29 cg Exp $'
+    "/      '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.497 2015-02-04 12:18:45 cg Exp $'
     "/ leftPart:
     "/      '$Header: /cvs/stx/stx/goodies/refactoryBrowser/lint/RBLiteralArrayContainsCommaRule.st,v'
     "/ dateAndTimePart:
@@ -5551,11 +5551,11 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.496 2015-01-25 00:26:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.497 2015-02-04 12:18:45 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.496 2015-01-25 00:26:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.497 2015-02-04 12:18:45 cg Exp $'
 ! !