--- a/CVSSourceCodeManager.st	Fri Nov 10 17:25:38 2006 +0100
+++ b/CVSSourceCodeManager.st	Fri Nov 10 18:14:30 2006 +0100
@@ -1263,16 +1263,19 @@
 !CVSSourceCodeManager class methodsFor:'saving'!
 
 savePreferencesOn:aStream
+    aStream nextPutLine:'  CVSSourceCodeManager notNil ifTrue:['.
+    aStream nextPutLine:'    CVSSourceCodeManager repositoryInfoPerModule:' , self repositoryInfoPerModule storeString , '.'.
     self cvsExecutable notNil ifTrue:[
-        aStream nextPutLine:'  CVSSourceCodeManager cvsExecutable:' , self cvsExecutable storeString , '.'.
+        aStream nextPutLine:'    CVSSourceCodeManager cvsExecutable:' , self cvsExecutable storeString , '.'.
     ].
-    aStream nextPutLine:'  CVSSourceCodeManager repositoryInfoPerModule:' , self repositoryInfoPerModule storeString , '.'.
     (Smalltalk at:#SourceCodeManager) == self ifTrue:[
-        aStream nextPutLine:'  Smalltalk at:#SourceCodeManager put: CVSSourceCodeManager.'.
-        aStream nextPutLine:'  CVSSourceCodeManager initializeForRepository:' , self repositoryName storeString , '.'.
+        aStream nextPutLine:'    Smalltalk at:#SourceCodeManager put: CVSSourceCodeManager.'.
+        aStream nextPutLine:'    CVSSourceCodeManager initializeForRepository:' , self repositoryName storeString , '.'.
     ].
+    aStream nextPutLine:'  ].'.
 
     "Created: / 09-11-2006 / 15:09:25 / cg"
+    "Modified: / 10-11-2006 / 18:14:16 / cg"
 ! !
 
 !CVSSourceCodeManager class methodsFor:'source code access'!
@@ -4496,7 +4499,7 @@
 !CVSSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.341 2006-11-09 14:12:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.342 2006-11-10 17:14:30 cg Exp $'
 ! !
 
 CVSSourceCodeManager initialize!