--- a/DataBaseSourceCodeManager.st	Thu Dec 29 19:04:18 2011 +0100
+++ b/DataBaseSourceCodeManager.st	Sun Jan 01 17:15:13 2012 +0100
@@ -270,11 +270,12 @@
     (Smalltalk at:#SourceCodeManager) == self ifTrue:[
         aStream nextPutLine:'    Smalltalk at:#SourceCodeManager put:DataBaseSourceCodeManager.'.
     ].
-    aStream nextPutLine:'    DataBaseSourceCodeManager repositoryPath:' , self repositoryPath storeString , '.'.
+    aStream nextPutLine:'    DataBaseSourceCodeManager repositoryName:' , self repositoryName storeString , '.'.
     aStream nextPutLine:'].'.
 
     "Created: / 09-11-2006 / 15:09:25 / cg"
     "Modified: / 22-12-2011 / 00:48:25 / cg"
+    "Modified: / 01-01-2012 / 17:02:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !DataBaseSourceCodeManager class methodsFor:'source code administration'!
@@ -596,9 +597,9 @@
 !DataBaseSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/DataBaseSourceCodeManager.st,v 1.4 2011-12-26 12:01:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/DataBaseSourceCodeManager.st,v 1.5 2012-01-01 16:15:13 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/DataBaseSourceCodeManager.st,v 1.4 2011-12-26 12:01:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/DataBaseSourceCodeManager.st,v 1.5 2012-01-01 16:15:13 vrany Exp $'
 ! !