View | Details | Raw Unified | Return to bug 14769
Collapse All | Expand All

(-)a/C4/AuthoritiesMarc.pm (-3 / +3 lines)
Lines 1471-1480 sub merge { Link Here
1471
                my $newtag = $tags_new && @$tags_new
1471
                my $newtag = $tags_new && @$tags_new
1472
                  ? _merge_newtag( $tag, $tags_new )
1472
                  ? _merge_newtag( $tag, $tags_new )
1473
                  : $tag;
1473
                  : $tag;
1474
                my $controlled_ind = Koha::Authority->new({ authtypecode => $authtypeto ? $authtypeto->authtypecode : undef })->controlled_biblio_indicators({ record => $MARCto, biblio_tag => $newtag }); #FIXME Replace this tric with new when refactoring
1474
                my $field_to = MARC::Field->new(
1475
                my $field_to = MARC::Field->new(
1475
                    $newtag,
1476
                    $newtag,
1476
                    $field->indicator(1),
1477
                    $controlled_ind->{ind1} // $field->indicator(1),
1477
                    $field->indicator(2),
1478
                    $controlled_ind->{ind2} // $field->indicator(2),
1478
                    9 => $mergeto, # Needed to create field, will be moved
1479
                    9 => $mergeto, # Needed to create field, will be moved
1479
                );
1480
                );
1480
                my ( @prefix, @postfix );
1481
                my ( @prefix, @postfix );
1481
- 

Return to bug 14769