View | Details | Raw Unified | Return to bug 4074
Collapse All | Expand All

(-)a/C4/Search.pm (-3 / +3 lines)
Lines 1308-1317 sub buildQuery { Link Here
1308
    # if user wants to do ccl or cql, start the query with that
1308
    # if user wants to do ccl or cql, start the query with that
1309
#    $query =~ s/:/=/g;
1309
#    $query =~ s/:/=/g;
1310
    $query =~ s/(?<=(ti|au|pb|su|an|kw|mc)):/=/g;
1310
    $query =~ s/(?<=(ti|au|pb|su|an|kw|mc)):/=/g;
1311
    $query =~ s/(?<=rtrn):/=/g;
1311
    $query =~ s/(?<=(wrdl)):/=/g;
1312
    $query =~ s/(?<=(trn|phr)):/=/g;
1312
    $limit =~ s/:/=/g;
1313
    $limit =~ s/:/=/g;
1313
    for ( $query, $query_desc, $limit, $limit_desc ) {
1314
    for ( $query, $query_desc, $limit, $limit_desc ) {
1314
        s/  / /g;    # remove extra spaces
1315
        s/  +/ /g;    # remove extra spaces
1315
        s/^ //g;     # remove any beginning spaces
1316
        s/^ //g;     # remove any beginning spaces
1316
        s/ $//g;     # remove any ending spaces
1317
        s/ $//g;     # remove any ending spaces
1317
        s/==/=/g;    # remove double == from query
1318
        s/==/=/g;    # remove double == from query
1318
- 

Return to bug 4074