request Biblio::Isis 0.24 to ignore empty subfields

git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@825 07558da8-63fa-0310-ba24-9fe276d99e06

diff --git a/Makefile.PL b/Makefile.PL
index d7948a0..0dcc728 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -24,7 +24,7 @@ WriteMakefile(
        'Encode' => 0,
        'LWP' => 0,
        'File::Path' => 0,
-       'Biblio::Isis' => 0.23,
+       'Biblio::Isis' => 0.24,
        'MARC::Fast' => 0.05,
        'Search::Estraier' => 0.06,
        'List::Util' => 0,

diff --git a/lib/WebPAC/Input/ISIS.pm b/lib/WebPAC/Input/ISIS.pm
index 293a666..1dca616 100644 (file)
--- a/lib/WebPAC/Input/ISIS.pm
+++ b/lib/WebPAC/Input/ISIS.pm
@@ -4,7 +4,7 @@ use warnings;
 use strict;
 
 use WebPAC::Input;
-use Biblio::Isis 0.23;
+use Biblio::Isis;
 use base qw/WebPAC::Common/;
 
 =head1 NAME
@@ -72,6 +72,7 @@ sub new {
                isisdb => $arg->{path},
                include_deleted => 1,
                hash_filter => $arg->{filter} ? sub { return $arg->{filter}->(@_); } : undef,
+               ignore_empty_subfields => 1,
        ) or $log->logdie("can't find database $arg->{path}");
 
        $self->{_isis_db} = $isis_db;