|
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 |
- |
|
|