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

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

Return to bug 12252