From f7622321de4e3fe7acee646a0fb8a817576621c3 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Thu, 26 Jun 2008 06:52:01 +0000
Subject: utf8 adjustments

---
 src/GF/Compile/Export.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/GF/Compile/Export.hs')

diff --git a/src/GF/Compile/Export.hs b/src/GF/Compile/Export.hs
index 9e9a99e99..23b8198f8 100644
--- a/src/GF/Compile/Export.hs
+++ b/src/GF/Compile/Export.hs
@@ -58,4 +58,5 @@ outputConcr pgf = case cncnames pgf of
                     cnc:_  -> cnc
 
 printPGF :: PGF -> String
-printPGF = encodeUTF8 . printTree . fromPGF
+printPGF = ---- encodeUTF8 .  -- out by AR26/6/2008: the PGF may already be UTF8 
+  printTree . fromPGF
-- 
cgit v1.2.3