@@ -, +, @@ allow zeroes --- C4/Biblio.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) --- a/C4/Biblio.pm +++ a/C4/Biblio.pm @@ -2422,9 +2422,10 @@ sub TransformMarcToKohaOneField { my $sub = $fldhash->{tagsubfield}; foreach my $fld ( $marc->field($tag) ) { if( $sub eq '@' || $fld->is_control_field ) { - push @rv, $fld->data if $fld->data; + my $data = $fld->data; + push @rv, $data if defined $data && $data ne ''; } else { - push @rv, grep { $_ } $fld->subfield($sub); + push @rv, grep { defined $_ && $_ ne '' } $fld->subfield($sub); } } } --