GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

allow empty lines in transliteration files

Browse Source
This commit is contained in:
aarne
2011-06-14 11:49:10 +00:00
parent 67c804d9a8
commit a772c0af48
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/compiler/GF/Text/Transliterations.hs
View File

@@ -90,7 +90,7 @@ mkTransliteration name ts us =
getTransliterationFile :: String -> String -> Transliteration
getTransliterationFile name = uncurry (mkTransliteration name) . codes
where
codes = unzip . map (mkOne . words) . lines
codes = unzip . map (mkOne . words) . filter (not . all isSpace) . lines
mkOne ws = case ws of
[c]:t:_ -> (t,fromEnum c) -- ä a:
u:t:_ -> (t,read u) -- 228 a: OR 0xe4