X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=fingerprinter;fp=fingerprinter;h=4386aee84e04e41efd579175a68bc9cd32df7275;hp=098747db52e3da8fb799790e1c428c3f543a928b;hb=073fc6462a48ca38e24c28a37ead7e824c8ee980;hpb=476038fc8d460b707306aa680713e11b09c691d8 diff --git a/fingerprinter b/fingerprinter index 098747d..4386aee 100755 --- a/fingerprinter +++ b/fingerprinter @@ -88,7 +88,7 @@ sub populate_marc { } unless ($marc{date1} and $marc{date1} =~ /\d{4}/) { my $my_260 = $record->field('260'); - if ($my_260) { + if ($my_260 and $my_260->subfield('c')) { my $date1 = $my_260->subfield('c'); $date1 =~ s/\D//g; if (defined $date1 and $date1 =~ /\d{4}/) {