--- a/AbstractLauncherApplication.st	Tue Nov 27 19:07:58 2001 +0100
+++ b/AbstractLauncherApplication.st	Wed Nov 28 14:56:18 2001 +0100
@@ -4004,6 +4004,7 @@
     (Smalltalk at:#SourceCodeManager) == CVSSourceCodeManager ifTrue:[
     s nextPutLine:'  Smalltalk at:#SourceCodeManager put: CVSSourceCodeManager.'.
     s nextPutLine:'  AbstractSourceCodeManager cacheDirectoryName:' , AbstractSourceCodeManager cacheDirectoryName storeString , '.'.
+    s nextPutLine:'  CVSSourceCodeManager cvsBinDirectory:' , CVSSourceCodeManager cvsBinDirectory storeString , '.'.
     s nextPutLine:'  CVSSourceCodeManager repositoryNamesPerModule:' , CVSSourceCodeManager repositoryNamesPerModule storeString , '.'.
     s nextPutLine:'  CVSSourceCodeManager initializeForRepository:' , CVSSourceCodeManager repositoryName storeString , '.'.
     ].
@@ -5235,10 +5236,22 @@
     resources := requestor class classResources.
 
     OperatingSystem isUNIXlike ifTrue:[
-        defaultsList := #('/files/CVS' '/CVS' 'host:/files/CVS' 'host:/CVS' ':pserver:user@host:/files/CVS').
+        defaultsList := #(
+                          '/files/CVS' 
+                          '/CVS' 
+                          'host:/files/CVS' 
+                          'host:/CVS' 
+                          ':pserver:user@host:/files/CVS'
+                         ).
     ] ifFalse:[
         OperatingSystem isMSDOSlike ifTrue:[
-            defaultsList := #(':local:c:\files\CVS' ':local:c:\CVS' 'host:/files/CVS' 'host:/CVS' ':pserver:user@host:/files/CVS').
+            defaultsList := #(
+                              ':local:c:\files\CVS' 
+                              ':local:c:\CVS' 
+                              'host:/files/CVS' 
+                              'host:/CVS' 
+                              ':pserver:user@host:/files/CVS'
+                             ).
         ] ifFalse:[
             defaultsList := #('host:/files/CVS' 'host:/CVS' ':pserver:user@host:/files/CVS').
         ]
@@ -6107,7 +6120,7 @@
              #(#SpecCollection
                 #collection: #(
                  #(#ActionButtonSpec
-                    #label: 'cancel'
+                    #label: 'Cancel'
                     #name: 'cancelButton'
                     #translateLabel: true
                     #tabable: true
@@ -6115,7 +6128,7 @@
                     #extent: #(#Point 141 21)
                   )
                  #(#ActionButtonSpec
-                    #label: 'help'
+                    #label: 'Help'
                     #name: 'helpButton'
                     #translateLabel: true
                     #tabable: true
@@ -6123,7 +6136,7 @@
                     #extent: #(#Point 141 21)
                   )
                  #(#ActionButtonSpec
-                    #label: 'ok'
+                    #label: 'OK'
                     #name: 'okButton'
                     #translateLabel: true
                     #tabable: true
@@ -6314,7 +6327,7 @@
              #(#SpecCollection
                 #collection: #(
                  #(#ActionButtonSpec
-                    #label: 'cancel'
+                    #label: 'Cancel'
                     #name: 'button'
                     #translateLabel: true
                     #tabable: true
@@ -6322,7 +6335,7 @@
                     #useDefaultExtent: true
                   )
                  #(#ActionButtonSpec
-                    #label: 'ok'
+                    #label: 'OK'
                     #name: 'Button1'
                     #translateLabel: true
                     #tabable: true
@@ -6343,5 +6356,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.181 2001-11-24 15:38:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.182 2001-11-28 13:56:18 cg Exp $'
 ! !