summaryrefslogtreecommitdiff
path: root/lib/VNWeb/Elm.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2020-07-07 09:49:51 +0200
committerYorhel <git@yorhel.nl>2020-07-07 09:49:51 +0200
commitcbcd0511dd220e456cb56469398fe4b37fbc7951 (patch)
treecd25c3c3da90ab7bf06c20475e70b595a001d3e7 /lib/VNWeb/Elm.pm
parent10bdc72a6e74f53f512f6b7d3b553315354f6585 (diff)
VN::Edit: Add staff editing
Diffstat (limited to 'lib/VNWeb/Elm.pm')
-rw-r--r--lib/VNWeb/Elm.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/VNWeb/Elm.pm b/lib/VNWeb/Elm.pm
index a2fdddb3..3625ba57 100644
--- a/lib/VNWeb/Elm.pm
+++ b/lib/VNWeb/Elm.pm
@@ -94,6 +94,12 @@ our %apis = (
name => {},
original => { required => 0, default => '' },
} } ],
+ StaffResult => [ { aoh => { # Response to 'Staff'
+ id => { id => 1 },
+ aid => { id => 1 },
+ name => {},
+ original => { required => 0, default => '' },
+ } } ],
CharResult => [ { aoh => { # Response to 'Chars'
id => { id => 1 },
name => {},
@@ -405,6 +411,7 @@ sub write_types {
$data .= def charRoles => 'List (String, String)' => list map tuple(string $_, string $CHAR_ROLE{$_}{txt}), keys %CHAR_ROLE;
$data .= def vnLengths => 'List (Int, String)' => list map tuple($_, string $VN_LENGTH{$_}{txt}.($VN_LENGTH{$_}{time}?" ($VN_LENGTH{$_}{time})":'')), keys %VN_LENGTH;
$data .= def vnRelations=> 'List (String, String)' => list map tuple(string $_, string $VN_RELATION{$_}{txt}), keys %VN_RELATION;
+ $data .= def creditTypes=> 'List (String, String)' => list map tuple(string $_, string $CREDIT_TYPE{$_}), keys %CREDIT_TYPE;
$data .= def curYear => Int => (gmtime)[5]+1900;
write_module Types => $data;