| 
      
            Lines 481-491
          if (C4::Context->preference('OpacSuppression')) {
      
      
        Link Here
      
     | 
  
        
          | 481 | 
                  my $IPAddress = $ENV{'REMOTE_ADDR'}; | 
          481 | 
                  my $IPAddress = $ENV{'REMOTE_ADDR'}; | 
        
        
          | 482 | 
                  my $IPRange = C4::Context->preference('OpacSuppressionByIPRange'); | 
          482 | 
                  my $IPRange = C4::Context->preference('OpacSuppressionByIPRange'); | 
        
        
          | 483 | 
                  if ($IPAddress !~ /^$IPRange/)  { | 
          483 | 
                  if ($IPAddress !~ /^$IPRange/)  { | 
        
          
            
              | 484 | 
                          $query = "($query) not Suppress=1";  | 
              484 | 
                          if ( $query_type eq 'pqf' ) { | 
            
            
               | 
               | 
              485 | 
                              $query = "($query) && -(suppress:1)";  | 
            
            
              | 486 | 
                          } else { | 
            
            
              | 487 | 
                              $query = "($query) not Suppress=1";  | 
            
            
              | 488 | 
                          }  | 
            
        
          | 485 | 
                  }  | 
          489 | 
                  }  | 
        
        
          | 486 | 
              }  | 
          490 | 
              }  | 
        
        
          | 487 | 
              else { | 
          491 | 
              else { | 
        
          
            
              | 488 | 
                      $query = "($query) not Suppress=1";  | 
              492 | 
                      if ( $query_type eq 'pqf' ) { | 
            
            
               | 
               | 
              493 | 
                          $query = "($query) && -(suppress:1)";  | 
            
            
              | 494 | 
                      } else { | 
            
            
              | 495 | 
                          $query = "($query) not Suppress=1";  | 
            
            
              | 496 | 
                      }  | 
            
        
          | 489 | 
              }  | 
          497 | 
              }  | 
        
        
          | 490 | 
          }  | 
          498 | 
          }  | 
        
        
          | 491 | 
           | 
          499 | 
           | 
        
            
              | 492 | 
              -   | 
               | 
               |