"Committed_by_peb"

This commit is contained in:
peb
2005-02-17 09:12:32 +00:00
parent f71763faa4
commit df91e999d6
8 changed files with 62 additions and 12 deletions

View File

@@ -31,6 +31,7 @@ import ExtraDiacritics (mkExtraDiacritics)
import Char
mkUnicode :: String -> String
mkUnicode s = case s of
'/':'/':cs -> treat [] mkGreek unic ++ mkUnicode rest
'/':'+':cs -> mkHebrew unic ++ mkUnicode rest