From 36e0248231062932f2c2fd6e1fe7453e3f782ee1 Mon Sep 17 00:00:00 2001 From: Garry Collum Date: Fri, 17 Jul 2009 19:54:10 -0400 Subject: [PATCH] Bug 2553: Fixes location drop-down alphabetization in Serials Statistics wizard form. Signed-off-by: Galen Charlton --- reports/serials_stats.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/reports/serials_stats.pl b/reports/serials_stats.pl index a42fc707bd..ff98f34a14 100755 --- a/reports/serials_stats.pl +++ b/reports/serials_stats.pl @@ -145,7 +145,7 @@ if($do_it){ ## We generate branchlist my $branches=GetBranches(); my @branchloop; - foreach (keys %$branches) { + 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), @@ -170,4 +170,4 @@ if($do_it){ branches => \@branchloop); } -output_html_with_http_headers $input, $cookie, $template->output; \ No newline at end of file +output_html_with_http_headers $input, $cookie, $template->output; -- 2.39.5