|
Lines 260-266
if ($session->param('busc')) {
Link Here
|
| 260 |
# Search given the current values from the busc param |
260 |
# Search given the current values from the busc param |
| 261 |
sub searchAgain |
261 |
sub searchAgain |
| 262 |
{ |
262 |
{ |
| 263 |
my ($arrParamsBusc, $offset, $results_per_page) = @_; |
263 |
my ($arrParamsBusc, $offset, $results_per_page, $patron) = @_; |
| 264 |
|
264 |
|
| 265 |
my $itemtypes = { map { $_->{itemtype} => $_ } @{ Koha::ItemTypes->search_with_localization->unblessed } }; |
265 |
my $itemtypes = { map { $_->{itemtype} => $_ } @{ Koha::ItemTypes->search_with_localization->unblessed } }; |
| 266 |
my @servers; |
266 |
my @servers; |
|
Lines 341-347
if ($session->param('busc')) {
Link Here
|
| 341 |
} |
341 |
} |
| 342 |
$arrParamsBusc{'count'} = $count; |
342 |
$arrParamsBusc{'count'} = $count; |
| 343 |
$results_per_page = $count; |
343 |
$results_per_page = $count; |
| 344 |
my $newresultsRef = searchAgain(\%arrParamsBusc, $offset, $results_per_page); |
344 |
my $newresultsRef = searchAgain(\%arrParamsBusc, $offset, $results_per_page, $patron); |
| 345 |
$arrParamsBusc{'listBiblios'} = buildListBiblios($newresultsRef, $results_per_page); |
345 |
$arrParamsBusc{'listBiblios'} = buildListBiblios($newresultsRef, $results_per_page); |
| 346 |
delete $arrParamsBusc{'previous'} if (exists($arrParamsBusc{'previous'})); |
346 |
delete $arrParamsBusc{'previous'} if (exists($arrParamsBusc{'previous'})); |
| 347 |
delete $arrParamsBusc{'next'} if (exists($arrParamsBusc{'next'})); |
347 |
delete $arrParamsBusc{'next'} if (exists($arrParamsBusc{'next'})); |
|
Lines 452-458
if ($session->param('busc')) {
Link Here
|
| 452 |
$offsetSearch = 0 if (defined($offsetSearch) && $offsetSearch < 0); |
452 |
$offsetSearch = 0 if (defined($offsetSearch) && $offsetSearch < 0); |
| 453 |
} |
453 |
} |
| 454 |
if ($searchAgain) { |
454 |
if ($searchAgain) { |
| 455 |
my $newresultsRef = searchAgain(\%arrParamsBusc, $offsetSearch, $results_per_page); |
455 |
my $newresultsRef = searchAgain(\%arrParamsBusc, $offsetSearch, $results_per_page, $patron); |
| 456 |
my @newresults = @$newresultsRef; |
456 |
my @newresults = @$newresultsRef; |
| 457 |
# build the new listBiblios |
457 |
# build the new listBiblios |
| 458 |
my $listBiblios = buildListBiblios(\@newresults, $results_per_page); |
458 |
my $listBiblios = buildListBiblios(\@newresults, $results_per_page); |
| 459 |
- |
|
|