diff options
author | Yorhel <git@yorhel.nl> | 2020-07-07 09:49:51 +0200 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2020-07-07 09:49:51 +0200 |
commit | cbcd0511dd220e456cb56469398fe4b37fbc7951 (patch) | |
tree | cd25c3c3da90ab7bf06c20475e70b595a001d3e7 /lib/VNWeb/Elm.pm | |
parent | 10bdc72a6e74f53f512f6b7d3b553315354f6585 (diff) |
VN::Edit: Add staff editing
Diffstat (limited to 'lib/VNWeb/Elm.pm')
-rw-r--r-- | lib/VNWeb/Elm.pm | 7 |
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; |