sort case-insensitively

This commit is contained in:
Josh Holtrop 2011-04-19 21:33:55 -04:00
parent 72ebf3417e
commit 56066a65ae

View File

@ -4411,7 +4411,7 @@ sub git_project_list_body {
);
my $oi = $order_info{$order};
if ($oi->{'type'} eq 'str') {
@projects = sort {$a->{$oi->{'key'}} cmp $b->{$oi->{'key'}}} @projects;
@projects = sort {lc($a->{$oi->{'key'}}) cmp lc($b->{$oi->{'key'}})} @projects;
} else {
@projects = sort {$a->{$oi->{'key'}} <=> $b->{$oi->{'key'}}} @projects;
}