ordering branches by branchcodes.

[koha_fer] / reserve / request.pl

diff --git a/reserve/request.pl b/reserve/request.pl
index 452e80d..dd78e9d 100755 (executable)
--- a/reserve/request.pl
+++ b/reserve/request.pl
@@ -436,7 +436,7 @@ my $default = C4::Context->userenv->{branch};
 my @values;
 my %label_of;
 
-foreach my $branchcode ( keys %{$branches} ) {
+foreach my $branchcode (sort keys %{$branches} ) {
     push @values, $branchcode;
     $label_of{$branchcode} = $branches->{$branchcode}->{branchname};
 }