summaryrefslogtreecommitdiff
path: root/lib/VNDB/Util/Auth.pm
diff options
context:
space:
mode:
authoryorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b>2008-07-29 14:04:31 +0000
committeryorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b>2008-07-29 14:04:31 +0000
commitc77ece04d45d0ae05a4de17bcfd94df90b64758e (patch)
tree6f76aa8a27de3aa5b141011ad021e6dc3eb830f5 /lib/VNDB/Util/Auth.pm
parent7aea19c2f8e71a7d630b613a57325c4dce1b1363 (diff)
- Further polished the rlist feature
- Re-added old VN list, delete-only and with a warning - Small code cleanup git-svn-id: svn://vndb.org/vndb@75 1fe2e327-d9db-4752-bcf7-ef0cb4a1748b
Diffstat (limited to 'lib/VNDB/Util/Auth.pm')
-rw-r--r--lib/VNDB/Util/Auth.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/VNDB/Util/Auth.pm b/lib/VNDB/Util/Auth.pm
index 2f79b512..6f265253 100644
--- a/lib/VNDB/Util/Auth.pm
+++ b/lib/VNDB/Util/Auth.pm
@@ -89,6 +89,7 @@ sub _AuthCheck {
return 4 if !defined $d->{id};
return 5 if !$d->{rank};
+ $d->{oldvnlist} = $self->DBGetVNList(uid => $d->{id}, results => 1)->[0] ? 1 : 0;
$info->{_auth} = $d;
return 1;
@@ -110,6 +111,7 @@ sub AuthAddTpl {
AuthMail => $info->{_auth}{mail},
AuthId => $info->{_auth}{id},
AuthNsfw => $info->{_auth}{flags} & $VNDB::UFLAGS->{nsfw},
+ AuthOldList => $info->{_auth}{oldvnlist},
);
} else {
%tpl = (