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 2301-2303
subtest 'filter_by_in_transit' => sub {
Link Here
|
2301 |
$schema->storage->txn_rollback; |
2302 |
$schema->storage->txn_rollback; |
2302 |
|
2303 |
|
2303 |
}; |
2304 |
}; |
2304 |
- |
2305 |
|
|
|
2306 |
subtest 'filter_by_has_holds' => sub { |
2307 |
plan tests => 3; |
2308 |
|
2309 |
$schema->storage->txn_begin; |
2310 |
|
2311 |
my $patron = $builder->build_object( { class => 'Koha::Patrons' } ); |
2312 |
t::lib::Mocks::mock_userenv( { branchcode => $patron->branchcode } ); |
2313 |
|
2314 |
my $library_1 = $builder->build( { source => 'Branch' } ); |
2315 |
my $library_2 = $builder->build( { source => 'Branch' } ); |
2316 |
|
2317 |
my $biblio = $builder->build_sample_biblio(); |
2318 |
my $item_1 = $builder->build_sample_item({ biblionumber => $biblio->biblionumber, }); |
2319 |
my $item_2 = $builder->build_sample_item({ biblionumber => $biblio->biblionumber, }); |
2320 |
|
2321 |
is ( $biblio->items->filter_by_has_holds->count, 0, "Filtered to 0 holds" ); |
2322 |
|
2323 |
my $hold_1 = $builder->build( |
2324 |
{ |
2325 |
source => 'Reserve', |
2326 |
value => { |
2327 |
itemnumber => $item_1->itemnumber, reservedate => dt_from_string, |
2328 |
} |
2329 |
} |
2330 |
); |
2331 |
|
2332 |
is ( $biblio->items->filter_by_has_holds->count, 1, "Filtered to 1 hold" ); |
2333 |
|
2334 |
my $hold_2 = $builder->build( |
2335 |
{ |
2336 |
source => 'Reserve', |
2337 |
value => { |
2338 |
itemnumber => $item_2->itemnumber, reservedate => dt_from_string, |
2339 |
} |
2340 |
} |
2341 |
); |
2342 |
|
2343 |
is ( $biblio->items->filter_by_has_holds->count, 2, "Filtered to 2 holds" ); |
2344 |
|
2345 |
$schema->storage->txn_rollback; |
2346 |
|
2347 |
}; |