From ce6ef24029805d391078267401ebb5182d9da5b3 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@biblibre.com>
Date: Wed, 21 Aug 2013 10:35:02 +0200
Subject: [PATCH] Bug 3134: Reindent delete_report

The first patch add a bad indentation for this routine. This patch fixes
that.
The $sth->finish statement is useless and should be removed.

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
---
 C4/Reports/Guided.pm |    9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm
index 9447c71..befc777 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;
-- 
1.7.10.4