From 38ce5b5160475264cb1231f6fa3060afdb02be45 Mon Sep 17 00:00:00 2001
From: Michael Schroeder <mls@suse.de>
Date: Tue, 11 Nov 2014 17:45:33 +0100
Subject: [PATCH] [backend] fix buildenv builds

---
 src/backend/bs_worker | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/backend/bs_worker b/src/backend/bs_worker
index e561507e6b0..27ccfa7c355 100755
--- a/src/backend/bs_worker
+++ b/src/backend/bs_worker
@@ -1953,7 +1953,7 @@ sub getbinaries_buildenv {
   # check the cache
   if ($cachedir) {
     for my $needed (sort keys %needed) {
-      for my $bv ($needed{$needed}) {
+      for my $bv (@{$needed{$needed}}) {
         my $repo = $bv->{'repo'};
         my $projid = $repo->{'project'};
         my $repoid = $repo->{'repository'};
@@ -1966,6 +1966,7 @@ sub getbinaries_buildenv {
 	  if ($id eq $bv->{'hdrmd5'}) {
 	    push @cacheold, [$cacheid, $s[7]];
 	    delete $needed{$needed};
+	    last;
           }
 	} else {
 	  unlink("$dir/$bv->{'name'}");
@@ -1988,7 +1989,7 @@ sub getbinaries_buildenv {
 
   # download... slowly...
   for my $needed (sort keys %needed) {
-    for my $bv ($needed{$needed}) {
+    for my $bv (@{$needed{$needed}}) {
       my $repo = $bv->{'repo'};
       my $server = $repo->{'server'} || $buildinfo->{'reposerver'};
       my $projid = $repo->{'project'};