Lines 575-581
sub UpdateFine {
Link Here
|
575 |
# we're updating an existing fine. Only modify if amount changed |
575 |
# we're updating an existing fine. Only modify if amount changed |
576 |
# Note that in the current implementation, you cannot pay against an accruing fine |
576 |
# Note that in the current implementation, you cannot pay against an accruing fine |
577 |
# (i.e. , of accounttype 'FU'). Doing so will break accrual. |
577 |
# (i.e. , of accounttype 'FU'). Doing so will break accrual. |
578 |
if ( $data->{'amount'} != $amount ) { |
578 |
if ( $data->{'amount'} ne sprintf('%.6f', $amount) ) { |
579 |
my $accountline = Koha::Account::Lines->find( $data->{accountlines_id} ); |
579 |
my $accountline = Koha::Account::Lines->find( $data->{accountlines_id} ); |
580 |
my $diff = $amount - $data->{'amount'}; |
580 |
my $diff = $amount - $data->{'amount'}; |
581 |
|
581 |
|
582 |
- |
|
|