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

(-)a/C4/Biblio.pm (-4 / +4 lines)
Lines 2941-2952 sub EmbedItemsInMarcBiblio { Link Here
2941
    require C4::Items;
2941
    require C4::Items;
2942
    while ( my ($itemnumber) = $sth->fetchrow_array ) {
2942
    while ( my ($itemnumber) = $sth->fetchrow_array ) {
2943
        next if @$itemnumbers and not grep { $_ == $itemnumber } @$itemnumbers;
2943
        next if @$itemnumbers and not grep { $_ == $itemnumber } @$itemnumbers;
2944
        my $i = C4::Items::GetItem($itemnumber) if $opachiddenitems;
2944
        my $i = $opachiddenitems ? C4::Items::GetItem($itemnumber) : undef;
2945
        push @items, { itemnumber => $itemnumber, item => $i };
2945
        push @items, { itemnumber => $itemnumber, item => $i };
2946
    }
2946
    }
2947
    my @hiddenitems =
2947
    my @hiddenitems =
2948
      C4::Items::GetHiddenItemnumbers( map { $_->{item} } @items )
2948
      $opachiddenitems
2949
      if $opachiddenitems;
2949
      ? C4::Items::GetHiddenItemnumbers( map { $_->{item} } @items )
2950
      : ();
2950
    # Convert to a hash for quick searching
2951
    # Convert to a hash for quick searching
2951
    my %hiddenitems = map { $_ => 1 } @hiddenitems;
2952
    my %hiddenitems = map { $_ => 1 } @hiddenitems;
2952
    foreach my $itemnumber ( map { $_->{itemnumber} } @items ) {
2953
    foreach my $itemnumber ( map { $_->{itemnumber} } @items ) {
2953
- 

Return to bug 12252