Lines 17-23
Link Here
|
17 |
|
17 |
|
18 |
use Modern::Perl; |
18 |
use Modern::Perl; |
19 |
|
19 |
|
20 |
use Test::More tests => 70; |
20 |
use Test::More tests => 71; |
|
|
21 |
use Test::NoWarnings; |
21 |
use Test::MockModule; |
22 |
use Test::MockModule; |
22 |
use Test::Warn; |
23 |
use Test::Warn; |
23 |
|
24 |
|
Lines 413-419
is(
Link Here
|
413 |
$which_highest->{reserve_id}, $reserve_id, |
414 |
$which_highest->{reserve_id}, $reserve_id, |
414 |
'CheckReserves returns higher priority future reserve with sufficient lookahead' |
415 |
'CheckReserves returns higher priority future reserve with sufficient lookahead' |
415 |
); |
416 |
); |
416 |
ModReserve( { reserve_id => $now_reserve_id, rank => 'del', cancellation_reason => 'test reserve' } ); |
417 |
|
|
|
418 |
{ |
419 |
# Prevent warning 'No reserves HOLD_CANCELLATION letter transported by email' |
420 |
my $mock_letters = Test::MockModule->new('C4::Letters'); |
421 |
$mock_letters->mock( 'GetPreparedLetter', sub { return } ); |
422 |
|
423 |
ModReserve( { reserve_id => $now_reserve_id, rank => 'del', cancellation_reason => 'test reserve' } ); |
424 |
} |
417 |
|
425 |
|
418 |
# End of tests for bug 9761 (ConfirmFutureHolds) |
426 |
# End of tests for bug 9761 (ConfirmFutureHolds) |
419 |
|
427 |
|
420 |
- |
|
|