---
C4/Reports/Guided.pm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm
index 5df6c2a..0e4f418 100644
--- a/C4/Reports/Guided.pm
+++ b/C4/Reports/Guided.pm
@@ -483,7 +483,7 @@ Given some sql and a name this will saved it so that it can
resued
sub save_report {
my ( $sql, $name, $type, $notes ) = @_;
my $dbh = C4::Context->dbh();
- $sql =~ s/(\W*)$//;
+ $sql =~ s/(\s*\;\s*)$//; # removes trailing whitespace and /;/
my $query =
"INSERT INTO saved_sql
(borrowernumber,date_created,last_modified,savedsql,report_name,type,notes)
VALUES (?,now(),now(),?,?,?,?)";
my $sth = $dbh->prepare($query);
--
1.5.6.5
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches
