Bug 6934: fix errors pointed out by the QA script

[koha.git] / reports / cash_register_stats.pl

diff --git a/reports/cash_register_stats.pl b/reports/cash_register_stats.pl
index 40ee489..ac5ea90 100755 (executable)
--- a/reports/cash_register_stats.pl
+++ b/reports/cash_register_stats.pl
@@ -137,13 +137,11 @@ if ($do_it) {
             total => $grantotal,
         );
     } else{
-        my $q_errors;
         my $format = 'csv';
         my $reportname = $input->param('basename');
         my $reportfilename = $reportname ? "$reportname.$format" : "reportresults.$format" ;
         #my $reportfilename = "$reportname.html" ;
         my $delimiter = C4::Context->preference('delimiter') || ',';
-        my ( $content );
             my @rows;
             foreach my $row (@loopresult) {
                 my @rowValues;