changed default from ship to install

This commit is contained in:
Dave Schuyler 2002-08-13 03:22:51 +00:00
parent 9f65686c35
commit 09442a6672

View File

@ -180,6 +180,7 @@ sub CTAttachCompute {
# #
while ( ! $done ) { while ( ! $done ) {
$spec = &CTResolveSpec( $_[0], $flav ) ; $spec = &CTResolveSpec( $_[0], $flav ) ;
#print STDERR "spec line '" . $spec . "' flav: '" . $flav ."'\n";
&CTUDebug( "spec line = '$spec'\n" ) ; &CTUDebug( "spec line = '$spec'\n" ) ;
if ( $spec ne "" ) { if ( $spec ne "" ) {
$root = &CTComputeRoot( $_[0], $flav, $spec ) ; $root = &CTComputeRoot( $_[0], $flav, $spec ) ;
@ -203,7 +204,7 @@ sub CTAttachCompute {
} elsif ( $flav eq "ship" ) { } elsif ( $flav eq "ship" ) {
$flav = "release" ; $flav = "release" ;
} else { } else {
$flav = "ship" ; $flav = "install" ;
} }
} elsif ( ! $done ) { } elsif ( ! $done ) {
$spec = "" ; $spec = "" ;