|
Lines 385-392
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 385 |
$biblioloopiter{noitems} = 1; |
385 |
$biblioloopiter{noitems} = 1; |
| 386 |
} |
386 |
} |
| 387 |
|
387 |
|
| 388 |
## Here we go backwards again to create hash of biblioitemnumber to itemnumbers, |
388 |
## Here we go backwards again to create hash of biblioitemnumber to itemnumbers |
| 389 |
## when by definition all of the itemnumber have the same biblioitemnumber |
389 |
## this is important when we have analytic items which may be on another record |
| 390 |
my ( $iteminfos_of ); |
390 |
my ( $iteminfos_of ); |
| 391 |
while ( my $item = $items->next ) { |
391 |
while ( my $item = $items->next ) { |
| 392 |
$item = $item->unblessed; |
392 |
$item = $item->unblessed; |
|
Lines 396-402
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 396 |
$iteminfos_of->{$itemnumber} = $item; |
396 |
$iteminfos_of->{$itemnumber} = $item; |
| 397 |
} |
397 |
} |
| 398 |
|
398 |
|
| 399 |
## Should be same as biblionumber |
|
|
| 400 |
my @biblioitemnumbers = keys %itemnumbers_of_biblioitem; |
399 |
my @biblioitemnumbers = keys %itemnumbers_of_biblioitem; |
| 401 |
|
400 |
|
| 402 |
my $biblioiteminfos_of = { |
401 |
my $biblioiteminfos_of = { |
|
Lines 444-450
foreach my $biblionumber (@biblionumbers) {
Link Here
|
| 444 |
# (before this loop was inside that sub loop so it was O(n^2) ) |
443 |
# (before this loop was inside that sub loop so it was O(n^2) ) |
| 445 |
my $items_any_available; |
444 |
my $items_any_available; |
| 446 |
|
445 |
|
| 447 |
$items_any_available = ItemsAnyAvailableAndNotRestricted( { biblionumber => $biblioitemnumber, patron => $patron }) |
446 |
$items_any_available = ItemsAnyAvailableAndNotRestricted( { biblionumber => $biblioitem->{biblionumber}, patron => $patron }) |
| 448 |
if $patron; |
447 |
if $patron; |
| 449 |
|
448 |
|
| 450 |
foreach my $itemnumber ( @{ $itemnumbers_of_biblioitem{$biblioitemnumber} } ) { |
449 |
foreach my $itemnumber ( @{ $itemnumbers_of_biblioitem{$biblioitemnumber} } ) { |
| 451 |
- |
|
|