From 45eb7e6d4f55f66c7d0e1550d5d668844be8f4d4 Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle@bywatersolutions.com>
Date: Fri, 31 Oct 2014 06:50:41 -0400
Subject: [PATCH] Bug 8836 [QA Followup] - Sort transfer branches
 alphabetically

Signed-off-by: Owen Leonard <oleonard@myacpl.org>

Libraries sort correctly now.

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
---
 rotating_collections/transferCollection.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/rotating_collections/transferCollection.pl b/rotating_collections/transferCollection.pl
index 855c45ada0..2a04857e6e 100755
--- a/rotating_collections/transferCollection.pl
+++ b/rotating_collections/transferCollection.pl
@@ -69,6 +69,7 @@ foreach my $br ( keys %$branches ) {
     $branch{name} = $branches->{$br}->{'branchname'};
     push( @branchoptionloop, \%branch );
 }
+@branchoptionloop = sort {$a->{name} cmp $b->{name}} @branchoptionloop;
 
 ## Get data about collection
 my ( $colId, $colTitle, $colDesc, $colBranchcode ) = GetCollection($colId);
-- 
2.39.5