|
Lines 619-626
my $max_items_to_display = C4::Context->preference('OpacMaxItemsToDisplay') // 5
Link Here
|
| 619 |
my $showcomp = C4::Context->preference('ShowComponentRecords'); |
619 |
my $showcomp = C4::Context->preference('ShowComponentRecords'); |
| 620 |
my ( $parts, $show_analytics ); |
620 |
my ( $parts, $show_analytics ); |
| 621 |
if ( $showcomp eq 'both' || $showcomp eq 'opac' ) { |
621 |
if ( $showcomp eq 'both' || $showcomp eq 'opac' ) { |
| 622 |
if ( my $components = $biblio->get_marc_components( C4::Context->preference('MaxComponentRecords') ) ) { |
622 |
my $components = $biblio->get_marc_components( C4::Context->preference('MaxComponentRecords') ); |
| 623 |
$show_analytics = 1 if @{$components}; # just show link when having results |
623 |
if ( @{$components} ) { |
|
|
624 |
$show_analytics = 1; # just show link when having results |
| 624 |
for my $part ( @{$components} ) { |
625 |
for my $part ( @{$components} ) { |
| 625 |
$part = C4::Search::new_record_from_zebra( 'biblioserver', $part ); |
626 |
$part = C4::Search::new_record_from_zebra( 'biblioserver', $part ); |
| 626 |
my $id = Koha::SearchEngine::Search::extract_biblionumber($part); |
627 |
my $id = Koha::SearchEngine::Search::extract_biblionumber($part); |
| 627 |
- |
|
|