From bb9aeaeec8fe7141df22463c9a0231e84f9ca3ee Mon Sep 17 00:00:00 2001
From: Ryan Higgins <rch@liblime.com>
Date: Thu, 11 Sep 2008 13:17:24 -0500
Subject: [PATCH] Sort libraries by name in holds queue's select input.

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
---
 circ/view_holdsqueue.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/circ/view_holdsqueue.pl b/circ/view_holdsqueue.pl
index 739dbe01a1..a52400bdd8 100755
--- a/circ/view_holdsqueue.pl
+++ b/circ/view_holdsqueue.pl
@@ -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,
-- 
2.20.1