[follow up](bug #3584) improve ccl detection
This improve the detection of ccl queries, and do not duplicate the "ccl=" value.
This commit is contained in:
parent
cdd3748717
commit
3037ff9e81
1 changed files with 6 additions and 6 deletions
12
C4/Search.pm
12
C4/Search.pm
|
@ -1017,13 +1017,13 @@ sub buildQuery {
|
|||
|
||||
my $cclq;
|
||||
my $indexes = getIndexes();
|
||||
for my $index (@$indexes){
|
||||
if($query =~ /($index)(,?\w)*:/){
|
||||
$cclq = 1;
|
||||
if( $query !~ /\s*ccl=/ ){
|
||||
for my $index (@$indexes){
|
||||
if($query =~ /($index)(,?\w)*:/){
|
||||
$cclq = 1;
|
||||
}
|
||||
}
|
||||
}
|
||||
if($cclq){
|
||||
$query = "ccl=$query";
|
||||
$query = "ccl=$query" if($cclq);
|
||||
}
|
||||
|
||||
# for handling ccl, cql, pqf queries in diagnostic mode, skip the rest of the steps
|
||||
|
|
Loading…
Reference in a new issue