Bug 2553: Alphabetization of branches in the catalogue stats report.
Improvement on previous patch by using GetBranchesLoop. Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
This commit is contained in:
parent
8c1b8b47c5
commit
be1ef2b2fa
|
|
@ -157,7 +157,7 @@
|
|||
<td><select name="Filter" id="branch">
|
||||
<option value=""> </option>
|
||||
<!-- TMPL_LOOP NAME="CGIBranch" -->
|
||||
<!-- TMPL_IF NAME="selected" --><option value="<!-- TMPL_VAR NAME="branchcode" -->" selected="selected"><!-- TMPL_VAR NAME="branchname" --></option><!-- TMPL_ELSE --><option value="<!-- TMPL_VAR NAME="branchcode" -->"><!-- TMPL_VAR NAME="branchname" --></option><!-- /TMPL_IF -->
|
||||
<!-- TMPL_IF NAME="selected" --><option value="<!-- TMPL_VAR NAME="value" -->" selected="selected"><!-- TMPL_VAR NAME="branchname" --></option><!-- TMPL_ELSE --><option value="<!-- TMPL_VAR NAME="value" -->"><!-- TMPL_VAR NAME="branchname" --></option><!-- /TMPL_IF -->
|
||||
<!-- /TMPL_LOOP -->
|
||||
</select>
|
||||
</td>
|
||||
|
|
|
|||
|
|
@ -153,18 +153,6 @@ if ($do_it) {
|
|||
push @authvals, { code => $_, description => $authvals->{$_} };
|
||||
}
|
||||
|
||||
|
||||
my $branches=GetBranches();
|
||||
my @branchloop;
|
||||
foreach (sort {$branches->{$a}->{'branchname'} cmp $branches->{$b}->{'branchname'}} keys %$branches) {
|
||||
my $thisbranch = ''; # FIXME: populate $thisbranch to preselect one
|
||||
my %row = (branchcode => $_,
|
||||
selected => ($thisbranch eq $_ ? 1 : 0),
|
||||
branchname => $branches->{$_}->{'branchname'},
|
||||
);
|
||||
push @branchloop, \%row;
|
||||
}
|
||||
|
||||
my $locations = GetKohaAuthorisedValues("items.location");
|
||||
my @locations;
|
||||
foreach (sort keys %$locations) {
|
||||
|
|
@ -177,7 +165,7 @@ if ($do_it) {
|
|||
haslccn => $haslccn,
|
||||
hascote => $hascote,
|
||||
CGIItemType => $CGIitemtype,
|
||||
CGIBranch => \@branchloop,
|
||||
CGIBranch => GetBranchesLoop(C4::Context->userenv->{'branch'}),
|
||||
locationloop => \@locations,
|
||||
authvals => \@authvals,
|
||||
CGIextChoice => \@mime,
|
||||
|
|
|
|||
Loading…
Reference in New Issue