Sort libraries by name in holds queue's select input.

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
This commit is contained in:
Ryan Higgins 2008-09-11 13:17:24 -05:00 committed by Galen Charlton
parent e3fe31b50b
commit bb9aeaeec8
1 changed files with 1 additions and 1 deletions

View File

@ -65,7 +65,7 @@ if ( $run_report ) {
my $branches = GetBranches;
my $branch = C4::Context->userenv->{"branchname"};
my @branchloop;
foreach my $thisbranch ( keys %$branches ) {
foreach my $thisbranch (sort { $branches->{$a}->{branchname} cmp $branches->{$b}->{branchname} } keys %$branches ) {
my $selected = 1 if $thisbranch eq $branch;
my %row = (
value => $thisbranch,