From b7e1e31909fe6e89887ade077c90c5fdb2081434 Mon Sep 17 00:00:00 2001 From: bringert Date: Sat, 20 May 2006 02:56:06 +0000 Subject: Changes to make GF compile with GHC 6.5 from CVS: remove inlines use of !, change all latin-1 characters in haskell code to escapes. --- src/GF/Text/OCSCyrillic.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/Text/OCSCyrillic.hs') diff --git a/src/GF/Text/OCSCyrillic.hs b/src/GF/Text/OCSCyrillic.hs index 7bbd1a773..0d4696944 100644 --- a/src/GF/Text/OCSCyrillic.hs +++ b/src/GF/Text/OCSCyrillic.hs @@ -21,7 +21,7 @@ mkOCSCyrillicWord str = case str of [] -> [] ' ' : cs -> ' ' : mkOCSCyrillicWord cs '<' : cs -> '<' : spoolMarkup cs - 'ä' : cs -> toEnum 0x0463 : mkOCSCyrillicWord cs + '\228' : cs -> toEnum 0x0463 : mkOCSCyrillicWord cs -- ä 'j' : 'e' : '~' : cs -> toEnum 0x0469 : mkOCSCyrillicWord cs 'j' : 'o' : '~' : cs -> toEnum 0x046d : mkOCSCyrillicWord cs 'j' : 'e' : cs -> toEnum 0x0465 : mkOCSCyrillicWord cs -- cgit v1.2.3