Bug 8436: Replace GetBranches with GetBranchesLoop

The branch selection logic still exists in GetBranchesLoop, it should be
used here.

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
Jonathan Druart 2015-02-20 10:57:52 +01:00 committed by Tomas Cohen Arazi
parent 0b903c5166
commit da57aba894
1 changed files with 3 additions and 17 deletions

View File

@ -106,31 +106,17 @@ if ($date) {
}
my $branchname;
my @branches_loop;
my $branches_loop;
if ( $flags->{superlibrarian}
or ( ref $flags->{serials} and $flags->{serials}->{superserials} )
or ( !ref $flags->{serials} and $flags->{serials} == 1 ) )
{
my $branches = GetBranches();
foreach my $b (sort keys %$branches) {
my $selected = 0;
if( $branch and $branch eq $b ){
$selected = 1;
$branchname = $branches->{$b}->{branchname};
}
push @branches_loop, {
branchcode => $b,
branchname => $branches->{$b}->{branchname},
selected => $selected,
};
}
$branches_loop = C4::Branch::GetBranchesLoop( $branch );
}
$template->param (
(uc(C4::Context->preference("marcflavour"))) => 1,
branches_loop => \@branches_loop,
branchcode => $branch,
branchname => $branchname,
branches_loop => $branches_loop,
);
output_html_with_http_headers $query, $cookie, $template->output;