| 
      
            Lines 82-95
          if ( ! $record ) {
      
      
        Link Here
      
     | 
  
        
          | 82 | 
          my @all_items = GetItemsInfo($biblionumber);  | 
          82 | 
          my @all_items = GetItemsInfo($biblionumber);  | 
        
        
          | 83 | 
          my @items2hide;  | 
          83 | 
          my @items2hide;  | 
        
        
          | 84 | 
          if (scalar @all_items >= 1) { | 
          84 | 
          if (scalar @all_items >= 1) { | 
        
            
               | 
               | 
              85 | 
                  my $borrowernumber;  | 
            
        
          | 85 | 
              my $borcat;  | 
          86 | 
              my $borcat;  | 
        
            
               | 
               | 
              87 | 
                  if (C4::Context->userenv) { | 
            
            
              | 88 | 
                      $borrowernumber = C4::Context->userenv->{'number'}; | 
            
            
              | 89 | 
                  }  | 
            
        
          | 86 | 
              if ( C4::Context->preference('OpacHiddenItemsExceptions') ) { | 
          90 | 
              if ( C4::Context->preference('OpacHiddenItemsExceptions') ) { | 
        
        
          | 87 | 
           | 
          91 | 
           | 
        
        
          | 88 | 
                  # we need to fetch the borrower info here, so we can pass the category  | 
          92 | 
                  # we need to fetch the borrower info here, so we can pass the category  | 
        
        
          | 89 | 
                  my $borrower = GetMember( borrowernumber => $borrowernumber );  | 
          93 | 
                  my $borrower = GetMember( borrowernumber => $borrowernumber );  | 
        
        
          | 90 | 
                  $borcat = $borrower->{categorycode}; | 
          94 | 
                  $borcat = $borrower->{categorycode}; | 
        
        
          | 91 | 
              }  | 
          95 | 
              }  | 
        
          
            
              | 92 | 
                  push @items2hide, GetHiddenItemnumbers({ items => \@all_items, borcat => $botcat }); | 
              96 | 
                  push @items2hide, GetHiddenItemnumbers({ items => \@all_items, borcat => $borcat }); | 
            
        
          | 93 | 
           | 
          97 | 
           | 
        
        
          | 94 | 
              if (scalar @items2hide == scalar @all_items ) { | 
          98 | 
              if (scalar @items2hide == scalar @all_items ) { | 
        
        
          | 95 | 
                  print $query->redirect("/cgi-bin/koha/errors/404.pl"); | 
          99 | 
                  print $query->redirect("/cgi-bin/koha/errors/404.pl"); | 
        
            
              | 96 | 
              -   | 
               | 
               |