--- trunk/lib/WebPAC/Normalize.pm 2005/11/12 21:31:47 39 +++ trunk/lib/WebPAC/Normalize.pm 2005/11/15 16:56:44 64 @@ -540,7 +540,7 @@ if ($sf && $$rec->{$f}->[$i]->{$sf}) { $$found++ if (defined($$found)); return $$rec->{$f}->[$i]->{$sf}; - } elsif ($$rec->{$f}->[$i]) { + } elsif (! $sf && $$rec->{$f}->[$i]) { $$found++ if (defined($$found)); # it still might have subfield, just # not specified, so we'll dump all @@ -553,6 +553,8 @@ } else { return $$rec->{$f}->[$i]; } + } else { + return ''; } } else { return '';