|
Lines 214-225
sub build_query_compat {
Link Here
|
| 214 |
|
214 |
|
| 215 |
#die Dumper($query); |
215 |
#die Dumper($query); |
| 216 |
# We roughly emulate the CGI parameters of the zebra query builder |
216 |
# We roughly emulate the CGI parameters of the zebra query builder |
| 217 |
my $query_cgi = 'idx=kw&q=' . uri_escape( $operands->[0] ) if @$operands; |
217 |
my $query_cgi = 'idx=kw&q=' . uri_escape_utf8( $operands->[0] ) if @$operands; |
| 218 |
my $simple_query = $operands->[0] if @$operands == 1; |
218 |
my $simple_query = $operands->[0] if @$operands == 1; |
| 219 |
my $query_desc = $simple_query; |
219 |
my $query_desc = $simple_query; |
| 220 |
my $limit = $self->_join_queries( $self->_convert_index_strings(@$limits)); |
220 |
my $limit = $self->_join_queries( $self->_convert_index_strings(@$limits)); |
| 221 |
my $limit_cgi = |
221 |
my $limit_cgi = |
| 222 |
'&limit=' . join( '&limit=', map { uri_escape($_) } @$orig_limits ); |
222 |
'&limit=' . join( '&limit=', map { uri_escape_utf8($_) } @$orig_limits ); |
| 223 |
my $limit_desc = "$limit" if $limit; |
223 |
my $limit_desc = "$limit" if $limit; |
| 224 |
return ( |
224 |
return ( |
| 225 |
undef, $query, $simple_query, $query_cgi, $query_desc, |
225 |
undef, $query, $simple_query, $query_cgi, $query_desc, |
| 226 |
- |
|
|