diff options
author | Yorhel <git@yorhel.nl> | 2019-06-19 15:20:45 +0200 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2019-06-19 15:20:49 +0200 |
commit | aab43cb3321ebc5149a30e23773f4ff97888b17e (patch) | |
tree | d73c20b46999bd53df01d7cf732dbd6d892e00c1 /lib/VNDB/Handler/VNPage.pm | |
parent | e5bf481b359b77dd873e63d54dec47c355260de6 (diff) |
VNPage: Display publishers and developers in deterministic order
Not sure why I hadn't fixed this several years ago already, the random
ordering has bothering me for at least that long.
Diffstat (limited to 'lib/VNDB/Handler/VNPage.pm')
-rw-r--r-- | lib/VNDB/Handler/VNPage.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/VNDB/Handler/VNPage.pm b/lib/VNDB/Handler/VNPage.pm index 53ba71ec..654866a1 100644 --- a/lib/VNDB/Handler/VNPage.pm +++ b/lib/VNDB/Handler/VNPage.pm @@ -606,7 +606,7 @@ sub _producers { if(grep $_->{developer}, map @{$_->{producers}}, @$r) { my %dev = map $_->{developer} ? ($_->{id} => $_) : (), map @{$_->{producers}}, @$r; - my @dev = values %dev; + my @dev = sort { $a->{name} cmp $b->{name} } values %dev; Tr; td 'Developer'; td; @@ -624,7 +624,7 @@ sub _producers { td; for my $l (@lang) { my %p = map $_->{publisher} ? ($_->{id} => $_) : (), map @{$_->{producers}}, grep grep($_ eq $l, @{$_->{languages}}), @$r; - my @p = values %p; + my @p = sort { $a->{name} cmp $b->{name} } values %p; next if !@p; cssicon "lang $l", $self->{languages}{$l}; for (@p) { |