Lines 330-342
$tag = $params->{tag} if $params->{tag};
Link Here
|
330 |
|
330 |
|
331 |
|
331 |
|
332 |
# String with params with the search criteria for the paging in opac-detail |
332 |
# String with params with the search criteria for the paging in opac-detail |
|
|
333 |
# param value is URI encoded and params separator is HTML encode (&) |
333 |
my $pasarParams = ''; |
334 |
my $pasarParams = ''; |
334 |
my $j = 0; |
335 |
my $j = 0; |
335 |
for (keys %$params) { |
336 |
for (keys %$params) { |
336 |
my @pasarParam = $cgi->param($_); |
337 |
my @pasarParam = $cgi->param($_); |
337 |
for my $paramValue(@pasarParam) { |
338 |
for my $paramValue(@pasarParam) { |
338 |
$pasarParams .= '&' if ($j > 0); |
339 |
$pasarParams .= '&' if ($j > 0); |
339 |
$pasarParams .= $_ . '=' . $paramValue; |
340 |
$pasarParams .= $_ . '=' . uri_escape($paramValue); |
340 |
$j++; |
341 |
$j++; |
341 |
} |
342 |
} |
342 |
} |
343 |
} |
Lines 511-520
if ($tag) {
Link Here
|
511 |
($error, $results_hashref, $facets) = C4::Search::pazGetRecords($query,$simple_query,\@sort_by,\@servers,$results_per_page,$offset,$expanded_facet,$branches,$query_type,$scan); |
512 |
($error, $results_hashref, $facets) = C4::Search::pazGetRecords($query,$simple_query,\@sort_by,\@servers,$results_per_page,$offset,$expanded_facet,$branches,$query_type,$scan); |
512 |
}; |
513 |
}; |
513 |
} else { |
514 |
} else { |
514 |
$pasarParams .= '&query=' . $query; |
515 |
$pasarParams .= '&query=' . uri_escape($query); |
515 |
$pasarParams .= '&count=' . $results_per_page; |
516 |
$pasarParams .= '&count=' . uri_escape($results_per_page); |
516 |
$pasarParams .= '&simple_query=' . $simple_query; |
517 |
$pasarParams .= '&simple_query=' . uri_escape($simple_query); |
517 |
$pasarParams .= '&query_type=' . $query_type if ($query_type); |
518 |
$pasarParams .= '&query_type=' . uri_escape($query_type) if ($query_type); |
518 |
eval { |
519 |
eval { |
519 |
($error, $results_hashref, $facets) = getRecords($query,$simple_query,\@sort_by,\@servers,$results_per_page,$offset,$expanded_facet,$branches,$itemtypes,$query_type,$scan,1); |
520 |
($error, $results_hashref, $facets) = getRecords($query,$simple_query,\@sort_by,\@servers,$results_per_page,$offset,$expanded_facet,$branches,$itemtypes,$query_type,$scan,1); |
520 |
}; |
521 |
}; |
Lines 675-686
for (my $i=0;$i<@servers;$i++) {
Link Here
|
675 |
my $j = 0; |
676 |
my $j = 0; |
676 |
foreach (@newresults) { |
677 |
foreach (@newresults) { |
677 |
my $bibnum = ($_->{biblionumber})?$_->{biblionumber}:0; |
678 |
my $bibnum = ($_->{biblionumber})?$_->{biblionumber}:0; |
678 |
$pasarParams .= $bibnum . ','; |
679 |
$pasarParams .= uri_escape($bibnum) . ','; |
679 |
$j++; |
680 |
$j++; |
680 |
last if ($j == $results_per_page); |
681 |
last if ($j == $results_per_page); |
681 |
} |
682 |
} |
682 |
chop $pasarParams if ($pasarParams =~ /,$/); |
683 |
chop $pasarParams if ($pasarParams =~ /,$/); |
683 |
$pasarParams .= '&total=' . int($total) if ($pasarParams !~ /total=(?:[0-9]+)?/); |
684 |
$pasarParams .= '&total=' . uri_escape( int($total) ) if ($pasarParams !~ /total=(?:[0-9]+)?/); |
684 |
if ($pasarParams) { |
685 |
if ($pasarParams) { |
685 |
my $session = get_session($cgi->cookie("CGISESSID")); |
686 |
my $session = get_session($cgi->cookie("CGISESSID")); |
686 |
$session->param('busc' => $pasarParams); |
687 |
$session->param('busc' => $pasarParams); |
687 |
- |
|
|