Koha-community/Koha
15
7
Fork 0
Code Issues Releases Wiki Activity

Bug 16653: (QA follow-up) Avoid a warning and remove unused variables

Browse source 
Signed-off-by: Julian Maurice <julian.maurice@biblibre.com>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
Julian Maurice 2018-06-25 14:58:17 +02:00 committed by Nick Clemens
parent d1587c494a
commit 1a01c62f9d
1 changed files with 1 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
reports/cat_issues_top.pl
View file

@ -93,7 +93,7 @@ if ($do_it) {
print $line->{rowtitle}.$sep;
foreach my $cell (@$x) {
print $cell->{value}.$sep;
print $cell->{count};
print $cell->{count} // '';
}
print "\n";
}
@ -102,10 +102,6 @@ if ($do_it) {
# Displaying choices
} else {
my $dbh = C4::Context->dbh;
my @values;
my %labels;
my %select;
my $req;
my $CGIextChoice = ( 'CSV' ); # FIXME translation
my $CGIsepChoice=GetDelimiterChoices;
@ -157,7 +153,6 @@ sub calculate {
my ($line, $column, $filters) = @_;
my @mainloop;
my @loopcol;
my @loopline;
my @looprow;
my %globalline;
my $grantotal =0;
@ -357,7 +352,6 @@ sub calculate {
my $dbcalc = $dbh->prepare($strcalc);
$dbcalc->execute;
my $previous_col;
my %indice;
while (my @data = $dbcalc->fetchrow) {
my ($row, $rank, $id, $callnum, $ccode, $loc, $col )=@data;