@@ -, +, @@ --- C4/Linker/Default.pm | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) --- a/C4/Linker/Default.pm +++ a/C4/Linker/Default.pm @@ -56,7 +56,7 @@ sub get_link { if ( !defined $authid && $self->{'broader_headings'} ) { my $field = $heading->field(); - my @subfields = $field->subfields(); + my @subfields = grep { $_->[0] ne '9' } $field->subfields(); if ( scalar @subfields > 1 ) { pop @subfields; $field->replace_with( @@ -64,7 +64,7 @@ sub get_link { $field->tag, $field->indicator(1), $field->indicator(2), - map { $_[0] => $_[1] } @subfields + map { $_->[0] => $_->[1] } @subfields ) ); ( $authid, $fuzzy ) = --