Lines 312-321
if ($barcode) {
Link Here
|
312 |
MARC::Record->new_from_usmarc($hit) ); |
312 |
MARC::Record->new_from_usmarc($hit) ); |
313 |
|
313 |
|
314 |
# offer all barcodes individually |
314 |
# offer all barcodes individually |
315 |
foreach my $barcode ( sort split(/\s*\|\s*/, $chosen->{barcode}) ) { |
315 |
if ( $chosen->{barcode} ) { |
316 |
my %chosen_single = %{$chosen}; |
316 |
foreach my $barcode ( sort split(/\s*\|\s*/, $chosen->{barcode}) ) { |
317 |
$chosen_single{barcode} = $barcode; |
317 |
my %chosen_single = %{$chosen}; |
318 |
push( @options, \%chosen_single ); |
318 |
$chosen_single{barcode} = $barcode; |
|
|
319 |
push( @options, \%chosen_single ); |
320 |
} |
319 |
} |
321 |
} |
320 |
} |
322 |
} |
321 |
$template->param( options => \@options ); |
323 |
$template->param( options => \@options ); |
322 |
- |
|
|