--- trunk/parse_format.pm 2004/03/29 19:40:45 292 +++ trunk/parse_format.pm 2004/03/29 19:41:12 293 @@ -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'"; }