| 
      
            Lines 569-584
          subtest 'C4::Biblio::EmbedItemsInMarcBiblio' => sub {
      
      
        Link Here
      
     | 
  
        
          | 569 | 
              { carped => 'EmbedItemsInMarcBiblio: No MARC record passed' }, | 
          569 | 
              { carped => 'EmbedItemsInMarcBiblio: No MARC record passed' }, | 
        
        
          | 570 | 
                'Should crap is no record passed.';  | 
          570 | 
                'Should crap 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 | 
              -   | 
               | 
               |