From 4d51367dd9a06ea835bcdc11abe15dc2ef248bd2 Mon Sep 17 00:00:00 2001
From: Garry Collum <gcollum@gmail.com>
Date: Sat, 1 Aug 2009 22:43:21 -0400
Subject: [PATCH] Bug 2553: Alphabetizes branches and item-type drop-down lists in opac-topissues.pl.
Content-Type: text/plain; charset="utf-8"

---
 opac/opac-topissues.pl |   16 ++--------------
 1 files changed, 2 insertions(+), 14 deletions(-)

diff --git a/opac/opac-topissues.pl b/opac/opac-topissues.pl
index 3371d1d..6b71226 100755
--- a/opac/opac-topissues.pl
+++ b/opac/opac-topissues.pl
@@ -94,24 +94,12 @@ $template->param(do_it => 1,
                 results_loop => \@results,
                 );
 
-# load the branches		## again??
-$branches = GetBranches();
-my @branch_loop;
-for my $branch_hash (sort keys %$branches ) {
-    my $selected=(C4::Context->userenv && ($branch_hash eq C4::Context->userenv->{branch})) if (C4::Context->preference('SearchMyLibraryFirst'));
-    push @branch_loop,
-      {
-        value      => "$branch_hash",
-        branchname => $branches->{$branch_hash}->{'branchname'},
-        selected => $selected
-      };
-}
-$template->param( branchloop => \@branch_loop, "mylibraryfirst"=>C4::Context->preference("SearchMyLibraryFirst"));
+$template->param( branchloop => GetBranchesLoop(C4::Context->userenv->{'branch'}));
 
 #doctype
 $itemtypes = GetItemTypes;
 my @itemtypeloop;
-foreach my $thisitemtype (keys %$itemtypes) {
+foreach my $thisitemtype (sort {$itemtypes->{$a}->{'description'} cmp $itemtypes->{$b}->{'description'}} keys %$itemtypes) {
         my %row =(value => $thisitemtype,
                     description => $itemtypes->{$thisitemtype}->{'description'},
                         );
-- 
1.5.6.5