authoritiy list shown in authtypetext order (so authtypetext with a space appear first, hint used everywhere else for lists)
This commit is contained in:
parent
e353fb78ae
commit
712dc1f9f6
1 changed files with 1 additions and 1 deletions
|
@ -46,7 +46,7 @@ my $resultsperpage;
|
|||
|
||||
my $authtypes = getauthtypes;
|
||||
my @authtypesloop;
|
||||
foreach my $thisauthtype (keys %$authtypes) {
|
||||
foreach my $thisauthtype (sort { $authtypes->{$a} <=> $authtypes->{$b} } keys %$authtypes) {
|
||||
my $selected = 1 if $thisauthtype eq $authtypecode;
|
||||
my %row =(value => $thisauthtype,
|
||||
selected => $selected,
|
||||
|
|
Loading…
Reference in a new issue