From aac83c8b840f62d3febf2212b86bf7cf40eb3fa1 Mon Sep 17 00:00:00 2001 From: Yorhel Date: Sat, 22 Nov 2008 09:42:00 +0100 Subject: Wrote a generic function to handle all /[vrp]+/(lock|hide) URIs They pretty much all work the same anyway --- lib/VNDB/DB/Misc.pm | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) (limited to 'lib/VNDB/DB/Misc.pm') diff --git a/lib/VNDB/DB/Misc.pm b/lib/VNDB/DB/Misc.pm index 6fb82801..d8348e71 100644 --- a/lib/VNDB/DB/Misc.pm +++ b/lib/VNDB/DB/Misc.pm @@ -6,7 +6,7 @@ use warnings; use Exporter 'import'; our @EXPORT = qw| - dbStats dbRevisionInsert dbItemInsert dbRevisionGet + dbStats dbRevisionInsert dbItemInsert dbRevisionGet dbItemMod |; @@ -145,5 +145,17 @@ sub dbRevisionGet { } +# Lock or hide a DB item +# arguments: v/r/p, id, %options ->( hidden, locked ) +sub dbItemMod { + my($self, $type, $id, %o) = @_; + $self->dbExec('UPDATE !s !H WHERE id = ?', + {qw|v vn r releases p producers|}->{$type}, + { map { ($_.' = ?', int $o{$_}) } keys %o }, $id + ); +} + + + 1; -- cgit v1.2.3