Bug 2553: Fixes the location drop-down alphabetization for the catalog statistics...

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>

diff --git a/reports/catalogue_stats.pl b/reports/catalogue_stats.pl
index 34b649f..365065f 100755 (executable)
--- a/reports/catalogue_stats.pl
+++ b/reports/catalogue_stats.pl
@@ -156,7 +156,7 @@ if ($do_it) {
 
        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),