chardb: Rushed in some crappy spoiler hiding stuff

1 files changed, 7 insertions, 1 deletions

diff --git a/lib/VNDB/Func.pm b/lib/VNDB/Func.pm
index edb6e3aa..64b56625 100644
--- a/lib/VNDB/Func.pm
+++ b/lib/VNDB/Func.pm
@@ -7,7 +7,7 @@ use TUWF ':html';
 use Exporter 'import';
 use POSIX 'strftime', 'ceil', 'floor';
 use VNDBUtil;
-our @EXPORT = (@VNDBUtil::EXPORT, qw| clearfloat cssicon tagscore mt minage fil_parse fil_serialize parenttags childtags |);
+our @EXPORT = (@VNDBUtil::EXPORT, qw| clearfloat cssicon tagscore mt minage fil_parse fil_serialize parenttags childtags charspoil |);
 
 
 # three ways to represent the same information
@@ -174,5 +174,11 @@ sub childtags {
 }
 
 
+# generates the class elements for character spoiler hiding
+sub charspoil {
+  return "charspoil charspoil_$_[0]".($_[0] ? ' hidden' : '');
+}
+
+
 1;