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

(-)a/t/db_dependent/HoldsQueue.t (-2 / +22 lines)
Lines 8-14 Link Here
8
8
9
use Modern::Perl;
9
use Modern::Perl;
10
10
11
use Test::More tests => 58;
11
use Test::More tests => 59;
12
use Data::Dumper;
12
use Data::Dumper;
13
13
14
use C4::Calendar qw( new insert_single_holiday );
14
use C4::Calendar qw( new insert_single_holiday );
Lines 1817-1819 subtest "GetHoldsQueueItems" => sub { Link Here
1817
1817
1818
    $schema->storage->txn_rollback;
1818
    $schema->storage->txn_rollback;
1819
};
1819
};
1820
- 
1820
1821
subtest "GetItemsAvailableToFillHoldsRequestsForBib" => sub {
1822
    plan tests => 2;
1823
1824
    $schema->storage->txn_begin;
1825
1826
    my $item_1 = $builder->build_sample_item();
1827
    my $item_2 = $builder->build_sample_item({ biblionumber => $item_1->biblionumber });
1828
    my $item_3 = $builder->build_sample_item({ biblionumber => $item_1->biblionumber });
1829
1830
    my $transfer = $builder->build_object({ class => 'Koha::Item::Transfers', value => {
1831
        itemnumber => $item_1->itemnumber,
1832
        datearrived => undef,
1833
        datecancelled => undef
1834
    }});
1835
1836
    my $items = C4::HoldsQueue::GetItemsAvailableToFillHoldRequestsForBib( $item_1->biblionumber );
1837
    is( scalar @$items, 2, "Two items without transfers correctly retrieved");
1838
    is_deeply( [$items->[0]->{itemnumber},$items->[1]->{itemnumber}],[$item_2->itemnumber,$item_3->itemnumber],"Correct two items retrieved");
1839
};
1840

Return to bug 30580