From 5ee8944155f21a0ab5a100a184163d7bd0e72679 Mon Sep 17 00:00:00 2001
From: Eelco Dolstra <eelco.dolstra@logicblox.com>
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 f062d17e6e..2a70e51933 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);