gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Rolling back changes made to NZ search elements 

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Chris Nighswonger 2007-12-21 13:00:46 -05:00 committed by Joshua Ferraro
parent 130cdf36c7
commit da9fdead92
1 changed files with 2 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
C4/Search.pm
View File

@ -934,12 +934,7 @@ sub buildQuery {
$query_cgi =~ s/^&//;
# append the limit to the query
if ($query) {
$query .=" ".$limit;
}
else {
$query = $limit;
}
$query .=" ".$limit;
warn "query=$query and limit=$limit" if $DEBUG;
@ -1397,7 +1392,7 @@ sub NZanalyse {
# it's a leaf, do the real SQL query and return the result
} else {
$string =~ s/__X__/"$commacontent"/ if $commacontent;
$string =~ s/-|\.|\?|,|;|!|'|\(|\)|\[|\]|{|}|"|&|\+|\*|\///g; # we must not introduce spaces in place of these chars
$string =~ s/-|\.|\?|,|;|!|'|\(|\)|\[|\]|{|}|"|&|\+|\*|\// /g;
warn "leaf:$string" if $DEBUG;
# parse the string in in operator/operand/value again
$string =~ /(.*)(>=|<=)(.*)/;
@ -1422,7 +1417,6 @@ sub NZanalyse {
$left='subject' if $left =~ '^su$';
$left='koha-Auth-Number' if $left =~ '^an$';
$left='keyword' if $left =~ '^kw$';
$left='itemtype' if $left =~ '^mc$'; # we must allow for limit operators since buildQuery will append $limit to $query
if ($operator && $left ne 'keyword' ) {
#do a specific search
my $dbh = C4::Context->dbh;