Lines 482-488
if (C4::Context->preference('OpacSuppression')) {
Link Here
|
482 |
my $IPRange = C4::Context->preference('OpacSuppressionByIPRange'); |
482 |
my $IPRange = C4::Context->preference('OpacSuppressionByIPRange'); |
483 |
if ($IPAddress !~ /^$IPRange/) { |
483 |
if ($IPAddress !~ /^$IPRange/) { |
484 |
if ( $query_type eq 'pqf' ) { |
484 |
if ( $query_type eq 'pqf' ) { |
485 |
$query = "($query) && -(suppress:1)"; |
485 |
$query = '@not '.$query.' @attr 1=9011 1'; |
486 |
} else { |
486 |
} else { |
487 |
$query = "($query) not Suppress=1"; |
487 |
$query = "($query) not Suppress=1"; |
488 |
} |
488 |
} |
Lines 490-496
if (C4::Context->preference('OpacSuppression')) {
Link Here
|
490 |
} |
490 |
} |
491 |
else { |
491 |
else { |
492 |
if ( $query_type eq 'pqf' ) { |
492 |
if ( $query_type eq 'pqf' ) { |
493 |
$query = "($query) && -(suppress:1)"; |
493 |
#$query = "($query) && -(suppress:1)"; #QP syntax |
|
|
494 |
$query = '@not '.$query.' @attr 1=9011 1'; #PQF syntax |
494 |
} else { |
495 |
} else { |
495 |
$query = "($query) not Suppress=1"; |
496 |
$query = "($query) not Suppress=1"; |
496 |
} |
497 |
} |
497 |
- |
|
|