|
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 |
- |
|
|