Lines 1048-1053
sub _build_weighted_query {
Link Here
|
1048 |
$weighted_query .= "an=\"$operand\""; |
1048 |
$weighted_query .= "an=\"$operand\""; |
1049 |
} |
1049 |
} |
1050 |
|
1050 |
|
|
|
1051 |
# If the index is numeric, don't autoquote it. |
1052 |
elsif ( $index =~ /,st-numeric$/ ) { |
1053 |
$weighted_query .= " $index=$operand"; |
1054 |
} |
1055 |
|
1051 |
# If the index already has more than one qualifier, wrap the operand |
1056 |
# If the index already has more than one qualifier, wrap the operand |
1052 |
# in quotes and pass it back (assumption is that the user knows what they |
1057 |
# in quotes and pass it back (assumption is that the user knows what they |
1053 |
# are doing and won't appreciate us mucking up their query |
1058 |
# are doing and won't appreciate us mucking up their query |
Lines 1150-1155
sub getIndexes{
Link Here
|
1150 |
'Illustration-code', |
1155 |
'Illustration-code', |
1151 |
'Index-term-genre', |
1156 |
'Index-term-genre', |
1152 |
'Index-term-uncontrolled', |
1157 |
'Index-term-uncontrolled', |
|
|
1158 |
'Interest-age-level', |
1159 |
'Interest-grade-level', |
1153 |
'ISBN', |
1160 |
'ISBN', |
1154 |
'isbn', |
1161 |
'isbn', |
1155 |
'ISSN', |
1162 |
'ISSN', |
Lines 1164-1169
sub getIndexes{
Link Here
|
1164 |
'LC-card-number', |
1171 |
'LC-card-number', |
1165 |
'lcn', |
1172 |
'lcn', |
1166 |
'lex', |
1173 |
'lex', |
|
|
1174 |
'lexile-number', |
1167 |
'llength', |
1175 |
'llength', |
1168 |
'ln', |
1176 |
'ln', |
1169 |
'ln-audio', |
1177 |
'ln-audio', |
Lines 1198-1203
sub getIndexes{
Link Here
|
1198 |
'popularity', |
1206 |
'popularity', |
1199 |
'pubdate', |
1207 |
'pubdate', |
1200 |
'Publisher', |
1208 |
'Publisher', |
|
|
1209 |
'Reading-grade-level', |
1201 |
'Record-control-number', |
1210 |
'Record-control-number', |
1202 |
'rcn', |
1211 |
'rcn', |
1203 |
'Record-type', |
1212 |
'Record-type', |
Lines 1543-1550
sub buildQuery {
Link Here
|
1543 |
#which is processed higher up in this sub. Other than that, year searches are typically |
1552 |
#which is processed higher up in this sub. Other than that, year searches are typically |
1544 |
#handled as limits which are not processed her either. |
1553 |
#handled as limits which are not processed her either. |
1545 |
|
1554 |
|
1546 |
# Date of Publication |
1555 |
# Search ranges: Date of Publication, st-numeric |
1547 |
if ( $index =~ /yr/ ) { |
1556 |
if ( $index =~ /(yr|st-numeric)/ ) { |
1548 |
#weight_fields/relevance search causes errors with date ranges |
1557 |
#weight_fields/relevance search causes errors with date ranges |
1549 |
#In the case of YYYY-, it will only return records with a 'yr' of YYYY (not the range) |
1558 |
#In the case of YYYY-, it will only return records with a 'yr' of YYYY (not the range) |
1550 |
#In the case of YYYY-YYYY, it will return no results |
1559 |
#In the case of YYYY-YYYY, it will return no results |
Lines 1784-1789
sub buildQuery {
Link Here
|
1784 |
warn "LIMIT DESC:" . $limit_desc; |
1793 |
warn "LIMIT DESC:" . $limit_desc; |
1785 |
warn "---------\nLeave buildQuery\n---------"; |
1794 |
warn "---------\nLeave buildQuery\n---------"; |
1786 |
} |
1795 |
} |
|
|
1796 |
|
1787 |
return ( |
1797 |
return ( |
1788 |
undef, $query, $simple_query, $query_cgi, |
1798 |
undef, $query, $simple_query, $query_cgi, |
1789 |
$query_desc, $limit, $limit_cgi, $limit_desc, |
1799 |
$query_desc, $limit, $limit_cgi, $limit_desc, |