bugfix: prevent crash when displaying authority record leader

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/authorities/detail.pl b/authorities/detail.pl
index a1fbdae..9a7a495 100755 (executable)
--- a/authorities/detail.pl
+++ b/authorities/detail.pl
@@ -370,7 +370,7 @@ sub build_tabs ($$$$$) {
                     @fields = $record->field($tag);
                 }
                 else {
-                  push @fields, $record->leader(); # if tag == 000
+                  push @fields, MARC::Field->new('000', $record->leader()); # if tag == 000
                 }
                 # loop through each field
                 foreach my $field (@fields) {