From c0e55c4bc9b4812b7987d17536477b188dffb4dd Mon Sep 17 00:00:00 2001 From: aarne Date: Fri, 21 Aug 2009 16:13:07 +0000 Subject: [PATCH] ancient greek ut additions --- src/GF/Text/Transliterations.hs | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/src/GF/Text/Transliterations.hs b/src/GF/Text/Transliterations.hs index 1cdd40951..dd5674f55 100644 --- a/src/GF/Text/Transliterations.hs +++ b/src/GF/Text/Transliterations.hs @@ -179,13 +179,13 @@ transAncientGreek = mkTransliteration "ancient Greek" allTrans allCodes where "y) y( y)` y(` y)' y(' y)~ y(~ - Y( - Y(` - Y(' - Y(~ " ++ "w) w( w)` w(` w)' w(' w)~ w(~ W) W( W)` W(` W)' W(' W)~ W(~ " ++ "a` a' e` e' h` h' i` i' o` o' y` y' w` w' - - " ++ - "- - - - - - - - - - - - - - - - " ++ -- 1f80- - "- - - - - - - - - - - - - - - - " ++ -- 1f90- -- TODO some combinations - "- - - - - - - - - - - - - - - - " ++ -- 1fa0- - "- - - - - - a~ a|~ - - - - - - - - " ++ -- 1fb0- - "- - - - - - h~ h|~ - - - - - - - - " ++ -- 1fc0- - "- - - - - - i~ i=~ - - - - - - - - " ++ -- 1fd0- - "- - - - - - y~ y|~ - - - - - - - - " ++ -- 1fe0- - "- - - - - - w~ w|~ - - - - - - - - " -- 1ff0- + "a|( a|) a|)` a|(` a|)' a|(' a|)~ a|(~ - - - - - - - - " ++ -- 1f80- + "h|( h|) h|)` h|(` h|)' h|(' h|)~ h|(~ - - - - - - - - " ++ -- 1f90- + "w|( w|) w|)` w|(` w|)' w|(' w|)~ w|(~ - - - - - - - - " ++ -- 1fa0- + "a. a_ a|` a| a|' - a~ a|~ - - - - - - - - " ++ -- 1fb0- + "- - h|` h| h|' - h~ h|~ - - - - - - - - " ++ -- 1fc0- + "i. i_ i=` i=' - - i~ i=~ - - - - - - - - " ++ -- 1fd0- + "y. y_ y=` y=' r) r( y~ y|~ - - - - - - - - " ++ -- 1fe0- + "- - w|` w| w|' - w~ w|~ - - - - - - - - " -- 1ff0- allCodes = [0x0380 .. 0x03cf] ++ [0x1f00 .. 0x1fff]