From 2d6bd4b741ed96ad07a68446258d07af234cdc4f Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 21 Aug 2013 10:35:02 +0200 Subject: [PATCH] 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 Signed-off-by: Galen Charlton --- 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 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 = <