This commit is contained in:
Eelco Dolstra 2012-07-11 10:13:16 -04:00
parent ae72be1b8b
commit 5ee8944155

View file

@ -233,7 +233,7 @@ sub getCacheId {
}
sub cachedGetInfoFrom {
sub getCachedInfoFrom {
my ($storePath, $binaryCacheUrl) = @_;
$queryNAR->execute(getCacheId($binaryCacheUrl), basename($storePath));
@ -279,7 +279,7 @@ sub printInfoParallel {
foreach my $storePath (@paths) {
my $found = 0;
foreach my $binaryCacheUrl (@binaryCacheUrls) {
my $info = cachedGetInfoFrom($storePath, $binaryCacheUrl);
my $info = getCachedInfoFrom($storePath, $binaryCacheUrl);
if (defined $info) {
printInfo($storePath, $info);
$found = 1;
@ -323,7 +323,7 @@ sub downloadBinary {
my ($storePath) = @_;
foreach my $binaryCacheUrl (@binaryCacheUrls) {
my $info = cachedGetInfoFrom($storePath, $binaryCacheUrl);
my $info = getCachedInfoFrom($storePath, $binaryCacheUrl);
unless (defined $info) {
next if negativeHit($storePath, $binaryCacheUrl);