From 973467479c966f535444ba2adc0ac2b948ca95c6 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 29 Mar 2004 19:41:12 +0000
Subject: [PATCH] bug fix: eval now honours codepage settings

git-svn-id: file:///home/dpavlin/private/svn/webpac/trunk@293 13eb9ef6-21d5-0310-b721-a9d68796d827
---
 parse_format.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/parse_format.pm b/parse_format.pm
index ca25b06..d12a94c 100644
--- a/parse_format.pm
+++ b/parse_format.pm
@@ -163,7 +163,7 @@ sub parse_iso_format {
 		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'";
 		}
 
-- 
2.20.1