Lines 19-25
Link Here
|
19 |
|
19 |
|
20 |
use Modern::Perl; |
20 |
use Modern::Perl; |
21 |
|
21 |
|
22 |
use Test::More tests => 22; |
22 |
use Test::More tests => 23; |
23 |
|
23 |
|
24 |
use Test::MockModule; |
24 |
use Test::MockModule; |
25 |
use Test::Exception; |
25 |
use Test::Exception; |
Lines 34-39
use Koha::Items;
Link Here
|
34 |
use Koha::Database; |
34 |
use Koha::Database; |
35 |
use Koha::DateUtils qw( dt_from_string ); |
35 |
use Koha::DateUtils qw( dt_from_string ); |
36 |
use Koha::Statistics; |
36 |
use Koha::Statistics; |
|
|
37 |
use Koha::Recalls; |
37 |
|
38 |
|
38 |
use t::lib::TestBuilder; |
39 |
use t::lib::TestBuilder; |
39 |
use t::lib::Mocks; |
40 |
use t::lib::Mocks; |
Lines 2502-2504
subtest 'filter_by_in_transit' => sub {
Link Here
|
2502 |
$schema->storage->txn_rollback; |
2503 |
$schema->storage->txn_rollback; |
2503 |
|
2504 |
|
2504 |
}; |
2505 |
}; |
2505 |
- |
2506 |
|
|
|
2507 |
subtest 'filter_by_has_holds' => sub { |
2508 |
plan tests => 3; |
2509 |
|
2510 |
$schema->storage->txn_begin; |
2511 |
|
2512 |
my $patron = $builder->build_object( { class => 'Koha::Patrons' } ); |
2513 |
t::lib::Mocks::mock_userenv( { branchcode => $patron->branchcode } ); |
2514 |
|
2515 |
my $library_1 = $builder->build( { source => 'Branch' } ); |
2516 |
my $library_2 = $builder->build( { source => 'Branch' } ); |
2517 |
|
2518 |
my $biblio = $builder->build_sample_biblio(); |
2519 |
my $item_1 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, } ); |
2520 |
my $item_2 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, } ); |
2521 |
|
2522 |
is( $biblio->items->filter_by_has_holds->count, 0, "Filtered to 0 holds" ); |
2523 |
|
2524 |
my $hold_1 = $builder->build( |
2525 |
{ |
2526 |
source => 'Reserve', |
2527 |
value => { |
2528 |
itemnumber => $item_1->itemnumber, reservedate => dt_from_string, |
2529 |
} |
2530 |
} |
2531 |
); |
2532 |
|
2533 |
is( $biblio->items->filter_by_has_holds->count, 1, "Filtered to 1 hold" ); |
2534 |
|
2535 |
my $hold_2 = $builder->build( |
2536 |
{ |
2537 |
source => 'Reserve', |
2538 |
value => { |
2539 |
itemnumber => $item_2->itemnumber, reservedate => dt_from_string, |
2540 |
} |
2541 |
} |
2542 |
); |
2543 |
|
2544 |
is( $biblio->items->filter_by_has_holds->count, 2, "Filtered to 2 holds" ); |
2545 |
|
2546 |
$schema->storage->txn_rollback; |
2547 |
|
2548 |
}; |