--- trunk2/lib/WebPAC.pm 2004/10/10 11:04:52 500 +++ trunk2/lib/WebPAC.pm 2004/10/10 11:25:10 501 @@ -731,7 +731,7 @@ } if ($eval_code) { - my $eval = $self->fill_in($rec,$eval_code,$i); + my $eval = $self->fill_in($rec,$eval_code,$i) || return; $log->debug("about to eval{$eval} format: $out"); return if (! $self->_eval($eval)); } @@ -927,7 +927,7 @@ # delimiter (or ,) my $d = $tag->{'delimiter'}; # default delimiter - $d ||= ", "; + $d ||= " "; my $last = pop @{$row->{$type}}; $d = "" if (! $last);