From c9d7c42a60399b054c3bafbf944a0afd5d47dc63 Mon Sep 17 00:00:00 2001
From: Galen Charlton <galen.charlton@liblime.com>
Date: Thu, 21 Aug 2008 10:48:31 -0500
Subject: [PATCH] bug 2540: allow download of report

$error return C4::Reports::execute_query is
always defined.

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
---
 reports/guided_reports.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/reports/guided_reports.pl b/reports/guided_reports.pl
index 9d80314876..0c5d94b7b9 100755
--- a/reports/guided_reports.pl
+++ b/reports/guided_reports.pl
@@ -399,7 +399,7 @@ elsif ($phase eq 'Export'){
 	my $sql = $input->param('sql');
         my $format = $input->param('format');
 	my ($results, $total, $errors) = execute_query($sql,1,0,0,$format);
-        if (!defined($errors)) {
+        if ($#$errors == -1) {
             $no_html=1;
             print $input->header(       -type => 'application/octet-stream',
                                         -attachment=>'reportresults.csv'
-- 
2.39.5