fixed decodeUTF8 for pgf; removed old resources from darcs

src/GF/Text/Transliterations.hs

@@ -32,7 +32,7 @@ transliteration s = case s of
 
 characterTable :: Transliteration -> String
 characterTable = unlines . map prOne . Map.assocs . trans_from_unicode where
-  prOne (i,s) = unwords ["|", show i, "|", encodeUTF8 [toEnum i], "|", s, "|"]
+  prOne (i,s) = unwords ["|", show i, "|", [toEnum i], "|", s, "|"]
 
 data Transliteration = Trans {
   trans_to_unicode   :: Map.Map String Int,

src/PGF.hs

@@ -172,7 +172,7 @@ startCat   :: PGF -> Category
 ---------------------------------------------------
 
 readPGF f = do
-  s <- readFile f
+  s <- readFile f >>= return . decodeUTF8 -- pgf is in UTF8, internal in unicode
   g <- parseGrammar s
   return $! toPGF g