--- a/AbstractLauncherApplication.st	Wed Apr 02 18:54:57 2003 +0200
+++ b/AbstractLauncherApplication.st	Wed Apr 02 19:05:44 2003 +0200
@@ -5357,35 +5357,33 @@
 
     OperatingSystem getDomainName = 'exept' ifFalse:[
         defaultsList := #(
-                            'host:/files/CVS' 
-                            'host:/CVS' 
-                            ':pserver:user@host:/files/CVS'
+                            'host:/cvs/stx' 
+                            ':pserver:user@host:/cvs/stx'
                          ).
+        defaultsList := defaultsList copyWith:(':pserver:' , OperatingSystem getLoginName , '@host:/cvs/stx')
     ] ifTrue:[
         defaultsList := #(
-                            '/archiv/stx' 
-                            'exept:/archiv/stx' 
-                            ':pserver:' , OperatingSystem getLoginName , '@exept:/archiv/stx'
+                            '/cvs/stx' 
+                            'exept:/cvs/stx' 
                          ).
+        defaultsList := defaultsList copyWith:(':pserver:' , OperatingSystem getLoginName , '@exept:/cvs/stx')
     ].
 
     OperatingSystem isUNIXlike ifTrue:[
         defaultsList := defaultsList , #(
-                          '/files/CVS' 
-                          '/CVS' 
+                          '/cvs/stx' 
                          ).
     ] ifFalse:[
         OperatingSystem isMSDOSlike ifTrue:[
             defaultsList := defaultsList , #(
-                              ':local:c:\files\CVS' 
-                              ':local:c:\CVS' 
+                              ':local:c:\cvs\stx' 
                              ).
         ] ifFalse:[
             "there might be more here in the future"
         ]
     ].
 
-    cvsRootHolder := CVSSourceCodeManager repositoryName ? '/files/CVS'.
+    cvsRootHolder := CVSSourceCodeManager repositoryName ? '/cvs/stx'.
     cvsRootHolder := cvsRootHolder asValue.
     rootsPerModule := Dictionary new declareAllFrom:(CVSSourceCodeManager repositoryNamesPerModule).
     cvsBinDirectoryHolder := CVSSourceCodeManager cvsBinDirectory asValue.
@@ -6430,5 +6428,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.266 2003-03-26 17:15:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.267 2003-04-02 17:05:44 cg Exp $'
 ! !