Lines 229-235
my $session = get_session($query->cookie("CGISESSID"));
Link Here
|
229 |
my %paging = (previous => {}, next => {}); |
229 |
my %paging = (previous => {}, next => {}); |
230 |
if ($session->param('busc')) { |
230 |
if ($session->param('busc')) { |
231 |
use C4::Search; |
231 |
use C4::Search; |
232 |
use URI::Escape; |
|
|
233 |
|
232 |
|
234 |
# Rebuild the string to store on session |
233 |
# Rebuild the string to store on session |
235 |
# param value is URI encoded and params separator is HTML encode (&) |
234 |
# param value is URI encoded and params separator is HTML encode (&) |
Lines 243-256
if ($session->param('busc')) {
Link Here
|
243 |
if ($_ =~ /^(?:query|listBiblios|newlistBiblios|query_type|simple_query|total|offset|offsetSearch|next|previous|count|expand|scan)/) { |
242 |
if ($_ =~ /^(?:query|listBiblios|newlistBiblios|query_type|simple_query|total|offset|offsetSearch|next|previous|count|expand|scan)/) { |
244 |
if (defined($arrParamsBusc->{$_})) { |
243 |
if (defined($arrParamsBusc->{$_})) { |
245 |
$pasarParams .= '&' if ($j); |
244 |
$pasarParams .= '&' if ($j); |
246 |
$pasarParams .= $_ . '=' . Encode::decode('UTF-8', uri_escape_utf8( $arrParamsBusc->{$_} )); |
245 |
$pasarParams .= $_ . '=' . $arrParamsBusc->{$_}; |
247 |
$j++; |
246 |
$j++; |
248 |
} |
247 |
} |
249 |
} else { |
248 |
} else { |
250 |
for my $value (@{$arrParamsBusc->{$_}}) { |
249 |
for my $value (@{$arrParamsBusc->{$_}}) { |
251 |
next if !defined($value); |
250 |
next if !defined($value); |
252 |
$pasarParams .= '&' if ($j); |
251 |
$pasarParams .= '&' if ($j); |
253 |
$pasarParams .= $_ . '=' . Encode::decode('UTF-8', uri_escape_utf8($value)); |
252 |
$pasarParams .= $_ . '=' . $value; |
254 |
$j++; |
253 |
$j++; |
255 |
} |
254 |
} |
256 |
} |
255 |
} |
Lines 314-325
if ($session->param('busc')) {
Link Here
|
314 |
for (@arrBusc) { |
313 |
for (@arrBusc) { |
315 |
($key, $value) = split(/=/, $_, 2); |
314 |
($key, $value) = split(/=/, $_, 2); |
316 |
if ($key =~ /^(?:query|listBiblios|newlistBiblios|query_type|simple_query|next|previous|total|offset|offsetSearch|count|expand|scan)/) { |
315 |
if ($key =~ /^(?:query|listBiblios|newlistBiblios|query_type|simple_query|next|previous|total|offset|offsetSearch|count|expand|scan)/) { |
317 |
$arrParamsBusc{$key} = uri_unescape($value); |
316 |
$arrParamsBusc{$key} = $value; |
318 |
} else { |
317 |
} else { |
319 |
unless (exists($arrParamsBusc{$key})) { |
318 |
unless (exists($arrParamsBusc{$key})) { |
320 |
$arrParamsBusc{$key} = []; |
319 |
$arrParamsBusc{$key} = []; |
321 |
} |
320 |
} |
322 |
push @{$arrParamsBusc{$key}}, uri_unescape($value); |
321 |
push @{$arrParamsBusc{$key}}, $value; |
323 |
} |
322 |
} |
324 |
} |
323 |
} |
325 |
my $searchAgain = 0; |
324 |
my $searchAgain = 0; |
326 |
- |
|
|