summaryrefslogtreecommitdiff
path: root/lib/VNDB/DB/VN.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2011-03-19 11:58:57 +0100
committerYorhel <git@yorhel.nl>2011-03-19 11:58:57 +0100
commitb1ea8d0af733887ca06094108ead070ffdcbba08 (patch)
tree48181bdad2c5e06b5c001fd95d6a1eaa8697993f /lib/VNDB/DB/VN.pm
parenta2165d2808cd1edd6b570a05d7b8d1bbc63b64c7 (diff)
chardb: Added char listing to VN pages
Still many todo's left...
Diffstat (limited to 'lib/VNDB/DB/VN.pm')
-rw-r--r--lib/VNDB/DB/VN.pm9
1 files changed, 8 insertions, 1 deletions
diff --git a/lib/VNDB/DB/VN.pm b/lib/VNDB/DB/VN.pm
index 0f6c5731..474066ce 100644
--- a/lib/VNDB/DB/VN.pm
+++ b/lib/VNDB/DB/VN.pm
@@ -7,7 +7,7 @@ use Exporter 'import';
use VNDB::Func 'gtintype', 'normalize_query';
use Encode 'decode_utf8';
-our @EXPORT = qw|dbVNGet dbVNRevisionInsert dbVNImageId dbScreenshotAdd dbScreenshotGet dbScreenshotRandom|;
+our @EXPORT = qw|dbVNGet dbVNRevisionInsert dbVNImageId dbScreenshotAdd dbScreenshotGet dbScreenshotRandom dbVNHasChar|;
# Options: id, rev, char, search, length, lang, olang, plat, tag_inc, tag_exc, tagspoil,
@@ -269,5 +269,12 @@ sub dbScreenshotRandom {
}
+sub dbVNHasChar {
+ my($self, $vid) = @_;
+ return $self->dbRow(
+ 'SELECT 1 AS exists FROM chars c JOIN chars_vns cv ON c.latest = cv.cid WHERE cv.vid = ?', $vid
+ )->{exists};
+}
+
1;