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

(-)a/t/db_dependent/Items.t (-9 / +23 lines)
Lines 567-584 subtest 'C4::Biblio::EmbedItemsInMarcBiblio' => sub { Link Here
567
    my $record = C4::Biblio::GetMarcBiblio($biblionumber);
567
    my $record = C4::Biblio::GetMarcBiblio($biblionumber);
568
    warning_is { C4::Biblio::EmbedItemsInMarcBiblio() }
568
    warning_is { C4::Biblio::EmbedItemsInMarcBiblio() }
569
    { carped => 'EmbedItemsInMarcBiblio: No MARC record passed' },
569
    { carped => 'EmbedItemsInMarcBiblio: No MARC record passed' },
570
      'Should crap is no record passed.';
570
      'Should carp is no record passed.';
571
571
572
    C4::Biblio::EmbedItemsInMarcBiblio( $record, $biblionumber );
572
    C4::Biblio::EmbedItemsInMarcBiblio({
573
        marc_record  => $record,
574
        biblionumber => $biblionumber });
573
    my @items = $record->field($itemfield);
575
    my @items = $record->field($itemfield);
574
    is( scalar @items, $number_of_items, 'Should return all items' );
576
    is( scalar @items, $number_of_items, 'Should return all items' );
575
577
576
    C4::Biblio::EmbedItemsInMarcBiblio( $record, $biblionumber,
578
    C4::Biblio::EmbedItemsInMarcBiblio({
577
        [ $itemnumbers[1], $itemnumbers[3] ] );
579
        marc_record  => $record,
580
        biblionumber => $biblionumber,
581
        item_numbers => [ $itemnumbers[1], $itemnumbers[3] ] });
578
    @items = $record->field($itemfield);
582
    @items = $record->field($itemfield);
579
    is( scalar @items, 2, 'Should return all items present in the list' );
583
    is( scalar @items, 2, 'Should return all items present in the list' );
580
584
581
    C4::Biblio::EmbedItemsInMarcBiblio( $record, $biblionumber, undef, 1 );
585
    C4::Biblio::EmbedItemsInMarcBiblio({
586
        marc_record  => $record,
587
        biblionumber => $biblionumber,
588
        opac         => 1 });
582
    @items = $record->field($itemfield);
589
    @items = $record->field($itemfield);
583
    is( scalar @items, $number_of_items, 'Should return all items for opac' );
590
    is( scalar @items, $number_of_items, 'Should return all items for opac' );
584
591
Lines 586-598 subtest 'C4::Biblio::EmbedItemsInMarcBiblio' => sub { Link Here
586
        homebranch: ['$library1->{branchcode}']";
593
        homebranch: ['$library1->{branchcode}']";
587
    t::lib::Mocks::mock_preference( 'OpacHiddenItems', $opachiddenitems );
594
    t::lib::Mocks::mock_preference( 'OpacHiddenItems', $opachiddenitems );
588
595
589
    C4::Biblio::EmbedItemsInMarcBiblio( $record, $biblionumber );
596
    C4::Biblio::EmbedItemsInMarcBiblio({
597
        marc_record  => $record,
598
        biblionumber => $biblionumber });
590
    @items = $record->field($itemfield);
599
    @items = $record->field($itemfield);
591
    is( scalar @items,
600
    is( scalar @items,
592
        $number_of_items,
601
        $number_of_items,
593
        'Even with OpacHiddenItems set, all items should have been embedded' );
602
        'Even with OpacHiddenItems set, all items should have been embedded' );
594
603
595
    C4::Biblio::EmbedItemsInMarcBiblio( $record, $biblionumber, undef, 1 );
604
    C4::Biblio::EmbedItemsInMarcBiblio({
605
        marc_record  => $record,
606
        biblionumber => $biblionumber,
607
        opac         => 1 );
596
    @items = $record->field($itemfield);
608
    @items = $record->field($itemfield);
597
    is(
609
    is(
598
        scalar @items,
610
        scalar @items,
Lines 603-609 subtest 'C4::Biblio::EmbedItemsInMarcBiblio' => sub { Link Here
603
    $opachiddenitems = "
615
    $opachiddenitems = "
604
        homebranch: ['$library1->{branchcode}', '$library2->{branchcode}']";
616
        homebranch: ['$library1->{branchcode}', '$library2->{branchcode}']";
605
    t::lib::Mocks::mock_preference( 'OpacHiddenItems', $opachiddenitems );
617
    t::lib::Mocks::mock_preference( 'OpacHiddenItems', $opachiddenitems );
606
    C4::Biblio::EmbedItemsInMarcBiblio( $record, $biblionumber, undef, 1 );
618
    C4::Biblio::EmbedItemsInMarcBiblio({
619
        marc_record  => $record,
620
        biblionumber => $biblionumber,
621
        opac         => 1 });
607
    @items = $record->field($itemfield);
622
    @items = $record->field($itemfield);
608
    is(
623
    is(
609
        scalar @items,
624
        scalar @items,
610
- 

Return to bug 14385