--- branches/tehnika/parse_format.pm 2004/04/02 22:46:02 295 +++ branches/tehnika/parse_format.pm 2004/04/02 22:49:32 296 @@ -163,7 +163,7 @@ sub fld2str { my ($func,$row,$f,$sf,$i) = @_; #print STDERR "## in fld2str\n"; - my $tmp = &$func($row,$f,$sf,$i) || ''; + my $tmp = $codepage->convert(&$func($row,$f,$sf,$i)) || ''; return "'$tmp'"; }