From ba8ebf6c2e40ca0fdab9d3a5238b8de19fc43eb2 Mon Sep 17 00:00:00 2001 From: Shawn Boyette Date: Tue, 30 Dec 2008 15:53:41 +0000 Subject: [PATCH 1/1] that's needed after all --- fingerprinter | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) 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}))); -- 1.7.2.5