diff options
author | yorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b> | 2008-06-27 09:54:12 +0000 |
---|---|---|
committer | yorhel <yorhel@1fe2e327-d9db-4752-bcf7-ef0cb4a1748b> | 2008-06-27 09:54:12 +0000 |
commit | 14c629650a83878d49f9b902227dbd7cc7e0845e (patch) | |
tree | ed2a306cd861524f2f2a13f987b120e6988d41d5 /lib/VNDB/VN.pm | |
parent | 58c923e320bf162723e40c4cc36f6e9a741dac13 (diff) |
Removed the v/r/p deletion feature - it was kind of broken anyway
git-svn-id: svn://vndb.org/vndb@37 1fe2e327-d9db-4752-bcf7-ef0cb4a1748b
Diffstat (limited to 'lib/VNDB/VN.pm')
-rw-r--r-- | lib/VNDB/VN.pm | 14 |
1 files changed, 1 insertions, 13 deletions
diff --git a/lib/VNDB/VN.pm b/lib/VNDB/VN.pm index ee6aa8d3..1a2a2ea7 100644 --- a/lib/VNDB/VN.pm +++ b/lib/VNDB/VN.pm @@ -9,7 +9,7 @@ require bytes; use vars ('$VERSION', '@EXPORT'); $VERSION = $VNDB::VERSION; -@EXPORT = qw| VNPage VNEdit VNLock VNDel VNHide VNBrowse VNXML VNUpdReverse |; +@EXPORT = qw| VNPage VNEdit VNLock VNHide VNBrowse VNXML VNUpdReverse |; sub VNPage { @@ -183,18 +183,6 @@ sub VNEdit { } -sub VNDel { - my $self = shift; - my $id = shift; - - my $v = $self->DBGetVN(id => $id)->[0]; - return $self->ResNotFound if !$v; - return $self->ResDenied if !$self->AuthCan('del'); - $self->DBDelVN($id); - return $self->ResRedirect('/v', 'perm'); -} - - sub VNLock { my $self = shift; my $id = shift; |