summaryrefslogtreecommitdiff
path: root/lib/VNWeb/Misc/History.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2021-03-07 18:14:46 +0100
committerYorhel <git@yorhel.nl>2021-03-11 11:07:34 +0100
commit24fa3ee0bd54f8342345fb785ea87bac59df45d8 (patch)
tree33ab463c32a71ec203fcda5d9fc37bd048a05e20 /lib/VNWeb/Misc/History.pm
parentf0bbc8b2e4f93b5aed098f97f9965f2aa0c215ae (diff)
Tags: Convert to vndbids + add edit histories
Another commit with changes all across the tree. But at least we have a tangible improvement now: edit histories for tags.
Diffstat (limited to 'lib/VNWeb/Misc/History.pm')
-rw-r--r--lib/VNWeb/Misc/History.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/VNWeb/Misc/History.pm b/lib/VNWeb/Misc/History.pm
index f8e15f27..35d9d6f0 100644
--- a/lib/VNWeb/Misc/History.pm
+++ b/lib/VNWeb/Misc/History.pm
@@ -41,6 +41,7 @@ sub fetch {
UNION ALL SELECT chid, name, original FROM chars_hist
UNION ALL SELECT chid, title, '' AS original FROM docs_hist
UNION ALL SELECT sh.chid, name, original FROM staff_hist sh JOIN staff_alias_hist sah ON sah.chid = sh.chid AND sah.aid = sh.aid
+ UNION ALL SELECT chid, name, '' AS original FROM tags_hist
) t(id, title, original)
WHERE id IN}), $lst;
($lst, $np)
@@ -90,11 +91,12 @@ sub filters_ {
my @types = (
[ v => 'Visual novels' ],
+ [ g => 'Tags' ],
[ r => 'Releases' ],
[ p => 'Producers' ],
[ s => 'Staff' ],
[ c => 'Characters' ],
- [ d => 'Docs' ]
+ [ d => 'Docs' ],
);
state $schema = tuwf->compile({ type => 'hash', keys => {
@@ -163,7 +165,7 @@ sub filters_ {
}
-TUWF::get qr{/(?:([upvrcsd][1-9][0-9]{0,6})/)?hist} => sub {
+TUWF::get qr{/(?:([upvrcsdg][1-9][0-9]{0,6})/)?hist} => sub {
my $id = tuwf->capture(1)||'';
my $obj = dbobj $id;