projects
/
migration-tools.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
support for dynamic mapping of circ fields
[migration-tools.git]
/
fingerprinter
diff --git
a/fingerprinter
b/fingerprinter
index
098747d
..
4386aee
100755
(executable)
--- 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}/) {