View | Details | Raw Unified | Return to bug 24146
Collapse All | Expand All

(-)a/C4/Overdues.pm (-4 / +1 lines)
Lines 526-533 sub UpdateFine { Link Here
526
    my $overdues = Koha::Account::Lines->search(
526
    my $overdues = Koha::Account::Lines->search(
527
        {
527
        {
528
            borrowernumber    => $borrowernumber,
528
            borrowernumber    => $borrowernumber,
529
            debit_type_code   => 'OVERDUE',
529
            debit_type_code   => 'OVERDUE'
530
            amountoutstanding => { '<>' => 0 }
531
        }
530
        }
532
    );
531
    );
533
532
Lines 561-567 sub UpdateFine { Link Here
561
        }
560
        }
562
    }
561
    }
563
562
564
565
    if ( $accountline ) {
563
    if ( $accountline ) {
566
        if ( $accountline->amount != $amount ) {
564
        if ( $accountline->amount != $amount ) {
567
            $accountline->adjust(
565
            $accountline->adjust(
568
- 

Return to bug 24146