Lines 106-136
if ($date) {
Link Here
|
106 |
} |
106 |
} |
107 |
|
107 |
|
108 |
my $branchname; |
108 |
my $branchname; |
109 |
my @branches_loop; |
109 |
my $branches_loop; |
110 |
if ( $flags->{superlibrarian} |
110 |
if ( $flags->{superlibrarian} |
111 |
or ( ref $flags->{serials} and $flags->{serials}->{superserials} ) |
111 |
or ( ref $flags->{serials} and $flags->{serials}->{superserials} ) |
112 |
or ( !ref $flags->{serials} and $flags->{serials} == 1 ) ) |
112 |
or ( !ref $flags->{serials} and $flags->{serials} == 1 ) ) |
113 |
{ |
113 |
{ |
114 |
my $branches = GetBranches(); |
114 |
$branches_loop = C4::Branch::GetBranchesLoop( $branch ); |
115 |
foreach my $b (sort keys %$branches) { |
|
|
116 |
my $selected = 0; |
117 |
if( $branch and $branch eq $b ){ |
118 |
$selected = 1; |
119 |
$branchname = $branches->{$b}->{branchname}; |
120 |
} |
121 |
push @branches_loop, { |
122 |
branchcode => $b, |
123 |
branchname => $branches->{$b}->{branchname}, |
124 |
selected => $selected, |
125 |
}; |
126 |
} |
127 |
} |
115 |
} |
128 |
|
116 |
|
129 |
$template->param ( |
117 |
$template->param ( |
130 |
(uc(C4::Context->preference("marcflavour"))) => 1, |
118 |
(uc(C4::Context->preference("marcflavour"))) => 1, |
131 |
branches_loop => \@branches_loop, |
119 |
branches_loop => $branches_loop, |
132 |
branchcode => $branch, |
|
|
133 |
branchname => $branchname, |
134 |
); |
120 |
); |
135 |
|
121 |
|
136 |
output_html_with_http_headers $query, $cookie, $template->output; |
122 |
output_html_with_http_headers $query, $cookie, $template->output; |
137 |
- |
|
|