gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 8447: Make sure we have enough subfields for broader_headings 

Thanks to wajasu for providing the debugging information, as I cannot
seem to duplicate the problem, even seeing where it could come from.

Fix corrects cases where upon save, a software error complaing about
indicators being wrong as a side effect of a poorly autogenerated
biblio/authority record.

Behvior with this fix causes existing bilio data to to be preserved
while linking to the authority via subtag 9.

Signed-off-by: wajasu <matted-34813@mypacks.net>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
This commit is contained in:
Jared Camins-Esakov 2012-09-07 10:58:53 -04:00 committed by Paul Poulain
parent f3ac37c8f4
commit 8a718d6c9b
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
C4/Linker/Default.pm
View File

@ -56,17 +56,16 @@ 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(
$field =
MARC::Field->new(
$field->tag,
$field->indicator(1),
$field->indicator(2),
map { $_[0] => $_[1] } @subfields
)
);
map { $_->[0] => $_->[1] } @subfields
);
( $authid, $fuzzy ) =
$self->get_link( C4::Heading->new_from_bib_field($field),
$behavior );