dev-camput, dev-camget: options to make demos better

Change-Id: Ie109cc156a081b72b83b9851630addf515c1ceec
This commit is contained in:
Brad Fitzpatrick 2013-07-29 10:15:59 -07:00
parent 5bd9d4bf64
commit 979444de66
3 changed files with 12 additions and 3 deletions

View File

@ -38,7 +38,10 @@ unless (grep { /^--?shared\b/ } @ARGV) {
}
push @args, @ARGV;
my $verbose = "true";
$verbose = "false" if $ENV{CAMLI_QUIET};
exec("$camget",
"--verbose",
"--verbose=$verbose",
@args);
die "Failure running camget: $!";

View File

@ -38,8 +38,11 @@ if ($ENV{"CAMLI_WANT_CAMPUT_PASSWORD"}) { # Set by dev-pass-camput
print "**\n** Note: password is \"foo\"\n**\n";
}
my $verbose = "true";
$verbose = "false" if $ENV{CAMLI_QUIET};
exec("$camput",
"--verbose",
"--verbose=$verbose",
"--server=$blobserver",
@ARGV);
die "Failure running camput: $!";

View File

@ -5,6 +5,9 @@ use FindBin qw($Bin);
sub build_bin {
my $target = shift;
my $final_bin = find_bin($target);
if ($ENV{CAMLI_FAST_DEV}) {
return $final_bin;
}
my $full_target = $target;
$full_target =~ s!^\./((cmd|server)/(\w+))$!camlistore.org/$1! or die "Bogus target $target";