From 58e85c5993459bc92e3c98945d139d4d1631f444 Mon Sep 17 00:00:00 2001 From: Julian Maurice Date: Wed, 2 Sep 2015 10:36:21 +0200 Subject: [PATCH] Bug 14769: Authorities merge: Set correct indicators in biblio field Biblio field indicators should be the same indicators as the linked authority's main field --- C4/AuthoritiesMarc.pm | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index efd372c..1a262ea 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -1528,7 +1528,12 @@ sub merge { my $auth_number=$field->subfield("9"); my $tag=$field->tag(); if ($auth_number==$mergefrom) { - my $field_to=MARC::Field->new(($tag_to?$tag_to:$tag),$field->indicator(1),$field->indicator(2),"9"=>$mergeto); + my $field_to = MARC::Field->new( + ($tag_to ? $tag_to : $tag), + $MARCto->field($auth_tag_to_report_to)->indicator(1), + $MARCto->field($auth_tag_to_report_to)->indicator(2), + "9"=>$mergeto + ); my $exclude='9'; foreach my $subfield (grep {$_->[0] ne '9'} @record_to) { $field_to->add_subfields($subfield->[0] =>$subfield->[1]); -- 1.9.1