/[webpac]/branches/tehnika/parse_format.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /branches/tehnika/parse_format.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 295 by dpavlin, Fri Mar 12 15:33:13 2004 UTC revision 296 by dpavlin, Fri Apr 2 22:49:32 2004 UTC
# Line 163  sub parse_iso_format { Line 163  sub parse_iso_format {
163                  sub fld2str {                  sub fld2str {
164                          my ($func,$row,$f,$sf,$i) = @_;                          my ($func,$row,$f,$sf,$i) = @_;
165  #print STDERR "## in fld2str\n";  #print STDERR "## in fld2str\n";
166                          my $tmp = &$func($row,$f,$sf,$i) || '';                          my $tmp = $codepage->convert(&$func($row,$f,$sf,$i)) || '';
167                          return "'$tmp'";                          return "'$tmp'";
168                  }                  }
169    

Legend:
Removed from v.295  
changed lines
  Added in v.296

  ViewVC Help
Powered by ViewVC 1.1.26