lix-project/lix
20
57
Fork 31
Code Issues 350 Code Review (Gerrit) Projects 3 Releases Wiki Activity

* Doh.

Browse source
This commit is contained in:
Eelco Dolstra 2008-08-04 13:15:47 +00:00
parent 5adbb0aabe
commit 42043953c3
2 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
scripts/copy-from-other-stores.pl.in
View file

@ -73,6 +73,7 @@ if ($ARGV[0] eq "--query") {
print "$deriver\n"; print "$deriver\n";
print scalar @references, "\n"; print scalar @references, "\n";
print "$_\n" foreach @references; print "$_\n" foreach @references;
print "0\n"; # !!! showing size not supported (yet)
} }
else { die "unknown command `$cmd'"; } else { die "unknown command `$cmd'"; }

2
scripts/download-using-manifests.pl.in
View file

@ -55,6 +55,8 @@ if ($ARGV[0] eq "--query") {
my @references = split " ", $info->{references}; my @references = split " ", $info->{references};
print scalar @references, "\n"; print scalar @references, "\n";
print "$_\n" foreach @references; print "$_\n" foreach @references;
my $size = $info->{size} or 0;
print "$size\n";
} }
else { die "unknown command `$cmd'"; } else { die "unknown command `$cmd'"; }