my @incumbents = ();
foreach my $field ( $marc->fields() ) {
- push @incumbents, $field->as_string();
+ push @incumbents, $field->as_formatted();
}
foreach $field ( $to_insert->fields() ) {
- if (!grep {$_ eq $field->as_string()} @incumbents) {
+ if (!grep {$_ eq $field->as_formatted()} @incumbents) {
$marc->insert_fields_ordered( ($field) );
}
}