From 3b4d31abe9b7bbf2bb66bdeeb022e6e99be67f8d Mon Sep 17 00:00:00 2001 From: Sophie Meynieux Date: Fri, 23 Mar 2012 15:02:22 +0100 Subject: [PATCH] Bug 7815 : Order pickup libraries list by name rather than by code Signed-off-by: Marijana Glavica Signed-off-by: Paul Poulain --- reserve/request.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/reserve/request.pl b/reserve/request.pl index e7191a9e0d..c34a614820 100755 --- a/reserve/request.pl +++ b/reserve/request.pl @@ -69,7 +69,7 @@ my $default = C4::Context->userenv->{branch}; my @values; my %label_of; -foreach my $branchcode (sort keys %{$branches} ) { +foreach my $branchcode ( sort { $branches->{$a}->{branchname} cmp $branches->{$b}->{branchname} } keys %$branches ) { push @values, $branchcode; $label_of{$branchcode} = $branches->{$branchcode}->{branchname}; } -- 2.39.5