Lines 565-572
sub UpdateFine {
Link Here
|
565 |
|
565 |
|
566 |
if ( $accountline ) { |
566 |
if ( $accountline ) { |
567 |
# a book may be returned while cronjob/fines.pl is running |
567 |
# a book may be returned while cronjob/fines.pl is running |
568 |
if ( ( $accountline->status eq 'UNRETURNED' || ! C4::Context->preference('CalculateFinesOnReturn') ) |
568 |
if ( |
569 |
&& Koha::Number::Price->new($accountline->amount)->round != Koha::Number::Price->new($amount)->round ) { |
569 |
$accountline->status eq 'UNRETURNED' |
|
|
570 |
&& ( Koha::Number::Price->new( $accountline->amount )->round != |
571 |
Koha::Number::Price->new($amount)->round ) |
572 |
) |
573 |
{ |
570 |
$accountline->adjust( |
574 |
$accountline->adjust( |
571 |
{ |
575 |
{ |
572 |
amount => $amount, |
576 |
amount => $amount, |
573 |
- |
|
|