From 5ee8944155f21a0ab5a100a184163d7bd0e72679 Mon Sep 17 00:00:00 2001 From: Eelco Dolstra Date: Wed, 11 Jul 2012 10:13:16 -0400 Subject: [PATCH] Cleanup --- scripts/download-from-binary-cache.pl.in | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scripts/download-from-binary-cache.pl.in b/scripts/download-from-binary-cache.pl.in index f062d17e6..2a70e5193 100644 --- a/scripts/download-from-binary-cache.pl.in +++ b/scripts/download-from-binary-cache.pl.in @@ -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);