utf8 adjustments

This commit is contained in:
aarne
2008-06-26 06:52:01 +00:00
parent 313ef2908d
commit f7622321de
2 changed files with 7 additions and 5 deletions

View File

@@ -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