--- trunk/marc_sf.pm 2003/07/14 17:08:37 105 +++ trunk/marc_sf.pm 2003/10/29 23:19:58 139 @@ -10,7 +10,8 @@ my $i = shift @_ || 0; - my @out = $marc->getvalue({record=>$marc->marc_count(),field=>$f,subfield=>$s,delimiter=>" "}); + my @out = $marc->getvalue({record=>$marc->marc_count(),field=>$f,subfield=>$s}); + return $out[$i] if (@out && $out[$i]); }