@@ -, +, @@ when there is no need 574: # we're updating an existing fine. Only modify if amount changed 577: if ( $data->{'amount'} != $amount ) { warn "AMOUNT ".$data->{'amount'}." vs $amount"; --- C4/Overdues.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) --- a/C4/Overdues.pm +++ a/C4/Overdues.pm @@ -574,7 +574,7 @@ sub UpdateFine { # we're updating an existing fine. Only modify if amount changed # Note that in the current implementation, you cannot pay against an accruing fine # (i.e. , of accounttype 'FU'). Doing so will break accrual. - if ( $data->{'amount'} != $amount ) { + if ( $data->{'amount'} ne sprintf('%.6f', $amount) ) { my $accountline = Koha::Account::Lines->find( $data->{accountlines_id} ); my $diff = $amount - $data->{'amount'}; --