|
Lines 485-491
sub _process_mappings {
Link Here
|
| 485 |
if (defined $options->{property}) { |
485 |
if (defined $options->{property}) { |
| 486 |
$_data = { |
486 |
$_data = { |
| 487 |
$options->{property} => $_data |
487 |
$options->{property} => $_data |
| 488 |
} |
488 |
} if $_data; |
| 489 |
} |
489 |
} |
| 490 |
if (defined $options->{nonfiling_characters_indicator}) { |
490 |
if (defined $options->{nonfiling_characters_indicator}) { |
| 491 |
my $nonfiling_chars = $meta->{field}->indicator($options->{nonfiling_characters_indicator}); |
491 |
my $nonfiling_chars = $meta->{field}->indicator($options->{nonfiling_characters_indicator}); |
|
Lines 494-500
sub _process_mappings {
Link Here
|
| 494 |
$_data = substr $_data, $nonfiling_chars; |
494 |
$_data = substr $_data, $nonfiling_chars; |
| 495 |
} |
495 |
} |
| 496 |
} |
496 |
} |
| 497 |
push @{$record_document->{$target}}, $_data; |
497 |
push @{$record_document->{$target}}, $_data if $_data; |
| 498 |
} |
498 |
} |
| 499 |
} |
499 |
} |
| 500 |
|
500 |
|
| 501 |
- |
|
|