From b223a5e23e393a83b5283520096e052cb122b189 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@biblibre.com>
Date: Fri, 10 Jan 2014 11:24:48 +0100
Subject: [PATCH] Bug 9811: FIX branches loop was not correctly set

The branches loop was not set with the values.

Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
---
 members/members-home.pl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/members/members-home.pl b/members/members-home.pl
index 002427296e..584c3879be 100755
--- a/members/members-home.pl
+++ b/members/members-home.pl
@@ -55,10 +55,13 @@ if ( C4::Branch::onlymine ) {
     }
 } else {
     foreach (sort { $branches->{$a}->{branchname} cmp $branches->{$b}->{branchname} } keys %{$branches}) {
+        my $selected = 0;
+        $selected = 1 if $branch and $branch eq $_;
         push @branchloop, {
-            value      => $_,
-            selected   => ($branches->{$_}->{branchcode} eq $branch),
+            value => $_,
+            branchcode => $_,
             branchname => $branches->{$_}->{branchname},
+            selected => $selected
         };
     }
 }
-- 
2.39.5