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

(-)a/C4/AuthoritiesMarc.pm (-3 / +1 lines)
Lines 1494-1501 sub merge { Link Here
1494
                foreach my $subfield (@restore) {
1494
                foreach my $subfield (@restore) {
1495
                   $field_to->add_subfields($subfield->[0] =>$subfield->[1]);
1495
                   $field_to->add_subfields($subfield->[0] =>$subfield->[1]);
1496
		}
1496
		}
1497
                $marcrecord->delete_field($field);
1497
            $field->replace_with($field_to);
1498
                $marcrecord->insert_grouped_field($field_to);            
1499
                $update=1;
1498
                $update=1;
1500
                }
1499
                }
1501
            }#for each tag
1500
            }#for each tag
1502
- 

Return to bug 17913