Bug 23924: Reset the fields to add

We do not want to copy fields from the previous records!

Signed-off-by: David Nind <david@davidnind.com>
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
Jonathan Druart 2020-01-31 10:01:59 +01:00 committed by Tomas Cohen Arazi
parent c04accc95c
commit d3995bf08a
No known key found for this signature in database
GPG Key ID: 0A272EA1B2F3C15F
1 changed files with 1 additions and 0 deletions

View File

@ -75,6 +75,7 @@ while ( my ( $biblionumber, $frameworkcode ) = $sth->fetchrow_array ) {
next if $marc_record->subfield($tag, $subfield);
}
if ( $date_field ) {
@fields_to_add = ();
my ( $tag, $subfield ) = split '\$', $date_field;
my $date = $marc_record->subfield($tag, $subfield);
next unless $date;