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

(-)a/C4/Overdues.pm (-13 / +14 lines)
Lines 512-531 sub UpdateFine { Link Here
512
512
513
    my $offset = 0;
513
    my $offset = 0;
514
    if ($fine) {
514
    if ($fine) {
515
        if (
515
        if ( $fine->accruing() ) { # Don't update or recreate fines no longer accruing
516
            sprintf( "%.6f", $fine->amount_original() )
516
            if (
517
            ne
517
                sprintf( "%.6f", $fine->amount_original() )
518
            sprintf( "%.6f", $amount ) )
518
                ne
519
        {
519
                sprintf( "%.6f", $amount ) )
520
            my $difference = $amount - $fine->amount_original();
520
            {
521
                my $difference = $amount - $fine->amount_original();
521
522
522
            $fine->amount_original( $fine->amount_original() + $difference );
523
                $fine->amount_original( $fine->amount_original() + $difference );
523
            $fine->amount_outstanding( $fine->amount_outstanding() + $difference );
524
                $fine->amount_outstanding( $fine->amount_outstanding() + $difference );
524
            $fine->amount_last_increment($difference);
525
                $fine->amount_last_increment($difference);
525
            $fine->updated_on($timestamp);
526
                $fine->updated_on($timestamp);
526
            $fine->update();
527
                $fine->update();
527
528
528
            $offset = 1;
529
                $offset = 1;
530
            }
529
        }
531
        }
530
    }
532
    }
531
    else {
533
    else {
532
- 

Return to bug 6427