Bug 22037: (QA follow-up) Correct misleading comment
Comment needs to be corrected, and now applies to the whole code paragraph following it. Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
parent
9a5e519d70
commit
766814ffa3
1 changed files with 2 additions and 1 deletions
|
@ -66,7 +66,8 @@ sub new {
|
||||||
my $dexpiry = $kp->{dateexpiry};
|
my $dexpiry = $kp->{dateexpiry};
|
||||||
$dexpiry and $dexpiry =~ s/-//g; # YYYYMMDD
|
$dexpiry and $dexpiry =~ s/-//g; # YYYYMMDD
|
||||||
|
|
||||||
my $fines_amount = $flags->{CHARGES}->{amount}; # This "amount" is the negative balance or the one of the guarantees
|
# Get fines and add fines for guarantees (depends on preference NoIssuesChargeGuarantees)
|
||||||
|
my $fines_amount = $flags->{CHARGES}->{amount};
|
||||||
$fines_amount = ($fines_amount and $fines_amount > 0) ? $fines_amount : 0;
|
$fines_amount = ($fines_amount and $fines_amount > 0) ? $fines_amount : 0;
|
||||||
my $guarantees_fines_amount = $flags->{CHARGES_GUARANTEES} ? $flags->{CHARGES_GUARANTEES}->{amount} : 0;
|
my $guarantees_fines_amount = $flags->{CHARGES_GUARANTEES} ? $flags->{CHARGES_GUARANTEES}->{amount} : 0;
|
||||||
$fines_amount += $guarantees_fines_amount;
|
$fines_amount += $guarantees_fines_amount;
|
||||||
|
|
Loading…
Reference in a new issue