AbstractLauncherApplication.st
changeset 7332 4ed25898a452
parent 7313 da499eef253e
child 7431 3f81f2ed64ed
--- a/AbstractLauncherApplication.st	Thu Sep 21 16:52:16 2006 +0200
+++ b/AbstractLauncherApplication.st	Thu Sep 21 16:53:11 2006 +0200
@@ -5477,7 +5477,7 @@
 cvsConfigurationDialog
     |cvsRootHolder resources defaultsList bindings dialog 
      listOfModules selectedPerModuleRoot rootsPerModule acceptChannel
-     removeEnabled cvsBinDirectoryHolder|
+     removeEnabled cvsExecutableHolder|
 
     resources := self owningClass classResources.
 
@@ -5513,7 +5513,7 @@
     cvsRootHolder := cvsRootHolder asValue.
     rootsPerModule := Dictionary new.
     rootsPerModule addAll:(CVSSourceCodeManager repositoryInfoPerModule).
-    cvsBinDirectoryHolder := CVSSourceCodeManager cvsBinDirectory asValue.
+    cvsExecutableHolder := CVSSourceCodeManager cvsExecutable asValue.
 
     bindings := IdentityDictionary new.
     bindings at:#acceptChannel put:(acceptChannel := TriggerValue new).
@@ -5524,7 +5524,7 @@
     bindings at:#perModuleRoot put:nil asValue.
     bindings at:#removeEnabled put:(removeEnabled := false asValue).
     bindings at:#listOfModules put:(listOfModules := rootsPerModule keys asList).
-    bindings at:#cvsBinDirectoryHolder put:cvsBinDirectoryHolder.
+    bindings at:#cvsExecutableHolder put:cvsExecutableHolder.
     listOfModules sort.
 
     bindings at:#selectedPerModuleRoot put:(selectedPerModuleRoot := nil asValue).
@@ -5582,13 +5582,15 @@
     "/
     "/ update system settings
     "/
-    CVSSourceCodeManager cvsBinDirectory:cvsBinDirectoryHolder value.
+    CVSSourceCodeManager cvsExecutable:cvsExecutableHolder value.
     CVSSourceCodeManager initializeForRepository:cvsRootHolder value.
     CVSSourceCodeManager repositoryInfoPerModule:rootsPerModule.
 
-"
-    self cvsConfigurationDialog
-"
+    "
+     self cvsConfigurationDialog
+    "
+
+    "Modified: / 21-09-2006 / 16:54:20 / cg"
 !
 
 fontBoxForEncoding:encodingMatch 
@@ -6555,5 +6557,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.336 2006-09-19 17:16:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.337 2006-09-21 14:53:11 cg Exp $'
 ! !