Bladeren bron

Bug 28386: Sort authors by lastname || firstname

If several authors have the same lastname, they are swapped in the list between the different runs.

This is reusing the code from the release_tools, see issue #24

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
21.05.x
Jonathan Druart 2 maanden geleden
bovenliggende
commit
3e8b14aa8e
  1. 13
      about.pl

13
about.pl

@ -719,10 +719,15 @@ for my $version ( sort { $a <=> $b } keys %{$teams->{team}} ) {
my @people = map {
{ name => $_, ( $contributors->{$_} ? %{ $contributors->{$_} } : () ) }
} sort {
my ($alast) = ( split( /\s/, $a ) )[-1];
my ($blast) = ( split( /\s/, $b ) )[-1];
lc($alast) cmp lc($blast)
} keys %{$contributors};
my ($alast) = $a =~ /(\S+)$/;
my ($blast) = $b =~ /(\S+)$/;
my $cmp = lc($alast||"") cmp lc($blast||"");
return $cmp if $cmp;
my ($a2last) = $a =~ /(\S+)\s\S+$/;
my ($b2last) = $b =~ /(\S+)\s\S+$/;
lc($a2last||"") cmp lc($b2last||"");
} keys %$contributors;
$template->param( contributors => \@people );
$template->param( maintenance_team => $teams->{team}->{$dev_team} );

Laden…
Annuleren
Opslaan