From: Shawn Boyette Date: Tue, 30 Dec 2008 15:53:41 +0000 (+0000) Subject: that's needed after all X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=commitdiff_plain;h=ba8ebf6c2e40ca0fdab9d3a5238b8de19fc43eb2 that's needed after all --- diff --git a/fingerprinter b/fingerprinter index 0bee304..f8ba533 100755 --- a/fingerprinter +++ b/fingerprinter @@ -74,7 +74,7 @@ sub populate_marc { # date1, date2 my $my_008 = $record->field('008'); - $marc{tag008} = $my_008->as_string();# if ($my_008); + $marc{tag008} = $my_008->as_string() if ($my_008); if (defined $marc{tag008}) { unless (length $marc{tag008} == 40) { $marc{tag008} = $marc{tag008} . ('|' x (40 - length($marc{tag008})));