X-Git-Url: http://git.rot13.org/?p=Biblio-Isis;a=blobdiff_plain;f=lib%2FBiblio%2FIsis.pm;h=54616571eedffc1f1b0299c44e13db2c4ccf3936;hp=ba32c69aa94b534eb48c72c860391f53eb70c78e;hb=cb1611b5c52327429c52a44b28f228bb34701933;hpb=a0f367ba3475ceac5185dc8c18b387795415e1b1

diff --git a/lib/Biblio/Isis.pm b/lib/Biblio/Isis.pm
index ba32c69..5461657 100644
--- a/lib/Biblio/Isis.pm
+++ b/lib/Biblio/Isis.pm
@@ -475,7 +475,10 @@ sub to_hash {
 		foreach my $l (@{$row->{$k}}) {
 
 			# filter output
-			$l = $self->{'hash_filter'}->($l) if ($self->{'hash_filter'});
+			if ($self->{'hash_filter'}) {
+				$l = $self->{'hash_filter'}->($l);
+				next unless defined($l);
+			}
 
 			my $val;