diff options
author | morkt <> | 2014-12-22 11:14:18 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2014-12-22 11:20:39 +0100 |
commit | ac784a64d0f74f9e04ac41890075c411e50ca823 (patch) | |
tree | f527926f531975751563e3d9286ce02212152850 /lib/VNDB/Handler/Misc.pm | |
parent | df383d117908160d1a84ce4519edc0c9bcf08c3b (diff) |
Initial implementation of a staff/seiyuu database
Diffstat (limited to 'lib/VNDB/Handler/Misc.pm')
-rw-r--r-- | lib/VNDB/Handler/Misc.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/VNDB/Handler/Misc.pm b/lib/VNDB/Handler/Misc.pm index 357779bc..1540c5fe 100644 --- a/lib/VNDB/Handler/Misc.pm +++ b/lib/VNDB/Handler/Misc.pm @@ -11,7 +11,7 @@ use POSIX 'strftime'; TUWF::register( qr{}, \&homepage, - qr{(?:([upvrc])([1-9]\d*)/)?hist}, \&history, + qr{(?:([upvrcs])([1-9]\d*)/)?hist},\&history, qr{d([1-9]\d*)}, \&docpage, qr{setlang}, \&setlang, qr{nospam}, \&nospam, @@ -206,6 +206,7 @@ sub history { $type eq 'p' ? $self->dbProducerGet(id => $id)->[0] : $type eq 'r' ? $self->dbReleaseGet(id => $id)->[0] : $type eq 'c' ? $self->dbCharGet(id => $id)->[0] : + $type eq 's' ? $self->dbStaffGet(id => $id)->[0] : $type eq 'v' ? $self->dbVNGet(id => $id)->[0] : undef; my $title = mt $type ? ('_hist_title_item', $obj->{title} || $obj->{name} || $obj->{username}) : '_hist_title'; return $self->resNotFound if $type && !$obj->{id}; |