Bug 7420 tiny bugfix

The printing at the end, in verbose mode was not displaying variables properly because the print was '' and not ""
This commit is contained in:
Paul Poulain 2012-07-25 18:31:50 +02:00
parent 1d569bced4
commit de07f00630

View file

@ -113,7 +113,6 @@ for my $overdue ( @{$overdues} ) {
my ( $amount, $type, $unitcounttotal ) =
CalcFine( $overdue, $borrower->{categorycode},
$branchcode, $datedue, $today );
$type ||= q{};
# Don't update the fine if today is a holiday.
@ -138,8 +137,8 @@ close $fh;
if ($verbose) {
my $overdue_items = @{$overdues};
print <<'EOM';
Fines assessment -- $today->ymd() -- Saved to $filename
print <<"EOM";
Fines assessment -- $today -- Saved to $filename
Number of Overdue Items:
counted $overdue_items
reported $counted