my $field = $test->{fields}[$i];
if ($field->{field} eq FID_ITEM_ID) {
- $field->{pat} = qr/^$item_diacritic_barcode$/;
+ $field->{pat} = qr/^$item_diacritic_barcode$/;
} elsif ($field->{field} eq FID_TITLE_ID) {
- $field->{pat} = qr/^$item_diacritic_title\s*$/;
+ $field->{pat} = qr/^$item_diacritic_title\s*$/;
+ $field->{just_warn} = 1;
} elsif ($field->{field} eq FID_OWNER) {
- $field->{pat} = qr/^$item_diacritic_owner$/;
+ $field->{pat} = qr/^$item_diacritic_owner$/;
}
}