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

(-)a/t/db_dependent/Overdues.t (-2 / +3 lines)
Lines 1-7 Link Here
1
#!/usr/bin/perl;
1
#!/usr/bin/perl;
2
2
3
use Modern::Perl;
3
use Modern::Perl;
4
use Test::More tests => 18;
4
use Test::More tests => 19;
5
use Test::NoWarnings;
5
use Test::Warn;
6
use Test::Warn;
6
7
7
use C4::Context;
8
use C4::Context;
Lines 549-554 subtest 'UpdateFine tests' => sub { Link Here
549
        { order_by       => { '-asc' => 'accountlines_id' } }
550
        { order_by       => { '-asc' => 'accountlines_id' } }
550
    );
551
    );
551
    is( $fines->count, 4, "New amount should be 0 so no fine added" );
552
    is( $fines->count, 4, "New amount should be 0 so no fine added" );
553
    t::lib::Mocks::mock_userenv( { patron => $patron_1 } );
552
    my @r = C4::Circulation::AddReturn( $item_1->barcode, $item_1->homebranch, 1 );
554
    my @r = C4::Circulation::AddReturn( $item_1->barcode, $item_1->homebranch, 1 );
553
    is( $r[1]->{WasReturned}, 1, "Returning the item and forgiving fines succeeds" );
555
    is( $r[1]->{WasReturned}, 1, "Returning the item and forgiving fines succeeds" );
554
556
555
- 

Return to bug 40409