From 285dd883564eaf96737b2be153bbe6d30e1b64f7 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Thu, 18 May 2017 16:40:42 -0300 Subject: [PATCH] Bug 18376: Do not need to prepare a single statement, use do Signed-off-by: Jonathan Druart Signed-off-by: Kyle M Hall --- admin/auth_tag_structure.pl | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/admin/auth_tag_structure.pl b/admin/auth_tag_structure.pl index 0832d14cab..4a3a67a1bf 100755 --- a/admin/auth_tag_structure.pl +++ b/admin/auth_tag_structure.pl @@ -160,10 +160,8 @@ if ($op eq 'add_form') { # called by delete_confirm, used to effectively confirm deletion of data in DB } elsif ($op eq 'delete_confirmed') { unless (C4::Context->config('demo') eq 1) { - my $sth_tag = $dbh->prepare("delete from auth_tag_structure where tagfield=? and authtypecode=?"); - $sth_tag->execute($searchfield,$authtypecode); - my $sth_sub = $dbh->prepare("delete from auth_subfield_structure where tagfield=? and authtypecode=?"); - $sth_sub->execute($searchfield,$authtypecode); + $dbh->do(q|delete from auth_tag_structure where tagfield=? and authtypecode=?|, undef, $searchfield, $authtypecode); + $dbh->do(q|delete from auth_subfield_structure where tagfield=? and authtypecode=?|, undef, $searchfield, $authtypecode); } my $tagfield = $input->param('tagfield'); print $input->redirect("/cgi-bin/koha/admin/auth_tag_structure.pl?searchfield=$tagfield&authtypecode=$authtypecode"); -- 2.39.5