diff options
Diffstat (limited to 'src/compiler/GF/Text')
| -rw-r--r-- | src/compiler/GF/Text/Transliterations.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/compiler/GF/Text/Transliterations.hs b/src/compiler/GF/Text/Transliterations.hs index aa9901141..b4ff2a64c 100644 --- a/src/compiler/GF/Text/Transliterations.hs +++ b/src/compiler/GF/Text/Transliterations.hs @@ -75,8 +75,8 @@ appTransToUnicode trans = appTransFromUnicode :: Transliteration -> String -> String appTransFromUnicode trans = concat . - map (maybe "?" id . - flip Map.lookup (trans_from_unicode trans) + map (\c -> maybe [toEnum c] id $ + Map.lookup c (trans_from_unicode trans) ) . map fromEnum |