summaryrefslogtreecommitdiff
path: root/lib/VN3/ElmGen.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/VN3/ElmGen.pm')
-rw-r--r--lib/VN3/ElmGen.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/VN3/ElmGen.pm b/lib/VN3/ElmGen.pm
index e28e2ff6..accef5e8 100644
--- a/lib/VN3/ElmGen.pm
+++ b/lib/VN3/ElmGen.pm
@@ -167,8 +167,8 @@ my $perms = VN3::Auth::listPerms();
def urlStatic => String => string tuwf->conf->{url_static};
def userPerms => 'List (Int, String)' => list map tuple($perms->{$_}, string $_), sort keys %$perms;
def vnLengths => 'List (Int, String)' => list map tuple($_, string vn_length_display $_), 0..$#VN_LENGTHS;
-def vnRelations => 'List (String, String)' => list map tuple(string $_, string vn_relation_display $_), vn_relations;
-def producerRelations => 'List (String, String)' => list map tuple(string $_, string producer_relation_display $_), keys %PRODUCER_RELATIONS;
+def vnRelations => 'List (String, String)' => list map tuple(string $_, string vn_relation_display $_), keys %VN_RELATION;
+def producerRelations => 'List (String, String)' => list map tuple(string $_, string producer_relation_display $_), keys %PRODUCER_RELATION;
def creditType => 'List (String, String)' => list map tuple(string $_, string $CREDIT_TYPE{$_}), keys %CREDIT_TYPE;
def languages => 'List (String, String)' => list map tuple(string $_, string $LANGUAGE{$_}), sort { $LANGUAGE{$a} cmp $LANGUAGE{$b} } keys %LANGUAGE;
def platforms => 'List (String, String)' => list map tuple(string $_, string $PLATFORM{$_}), keys %PLATFORM;