summaryrefslogtreecommitdiff
path: root/lib/VNDB/DB/ULists.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/VNDB/DB/ULists.pm')
-rw-r--r--lib/VNDB/DB/ULists.pm11
1 files changed, 5 insertions, 6 deletions
diff --git a/lib/VNDB/DB/ULists.pm b/lib/VNDB/DB/ULists.pm
index a0cf4f18..6831e579 100644
--- a/lib/VNDB/DB/ULists.pm
+++ b/lib/VNDB/DB/ULists.pm
@@ -101,18 +101,17 @@ sub dbVNListList {
);
if(@$rel) {
- my %rel = map {
- $_->{languages}=[];
- $_->{latest}, $_->{languages}
- } @$rel;
-
+ my %rel = map { $_->{latest} => [] } @$rel;
push(@{$rel{$_->{rid}}}, $_->{lang}) for (@{$self->dbAll(q|
SELECT rid, lang
FROM releases_lang
WHERE rid IN(!l)|,
[ keys %rel ]
)});
- push @{$vns{$_->{vid}}}, $_ for @$rel;
+ for(@$rel) {
+ $_->{languages} = $rel{$_->{latest}};
+ push @{$vns{$_->{vid}}}, $_;
+ }
}
}