From: Jonathan Druart <jonathan.druart@biblibre.com>
Date: Wed, 21 Aug 2013 08:35:02 +0000 (+0200)
Subject: Bug 3134: (follow-up) Reindent delete_report
X-Git-Tag: v3.14.00-alpha1~361
X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=commitdiff_plain;h=2d6bd4b741ed96ad07a68446258d07af234cdc4f;p=koha-ffzg.git

Bug 3134: (follow-up) Reindent delete_report

The first patch add a bad indentation for this routine. This patch fixes
that.

Also, the $sth->finish statement is useless and was removed.

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
Signed-off-by: Galen Charlton <gmc@esilibrary.com>
---

diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm
index 9447c7185a..befc7777e4 100644
--- a/C4/Reports/Guided.pm
+++ b/C4/Reports/Guided.pm
@@ -610,11 +610,10 @@ sub format_results {
 
 sub delete_report {
     my (@ids) = @_;
-        my $dbh = C4::Context->dbh;
-        my $query = 'DELETE FROM saved_sql WHERE id IN (' . join( ',', ('?') x @ids ) . ')';
-        my $sth = $dbh->prepare($query);
-        $sth->execute(@ids);
-        $sth->finish;
+    my $dbh = C4::Context->dbh;
+    my $query = 'DELETE FROM saved_sql WHERE id IN (' . join( ',', ('?') x @ids ) . ')';
+    my $sth = $dbh->prepare($query);
+    $sth->execute(@ids);
 }
 
 my $SAVED_REPORTS_BASE_QRY = <<EOQ;