diff options
| author | Juri Linkov <juri@jurta.org> | 2008-07-19 23:59:09 +0000 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2008-07-19 23:59:09 +0000 |
| commit | 3264622b60089437b9f40dd0efd325826ce131ca (patch) | |
| tree | 217c62fc92da58fd3af6394e4d1990d92b52e215 /leim | |
| parent | fb28320e3207936605b54fb2fe22901c73c610a4 (diff) | |
| download | emacs-3264622b60089437b9f40dd0efd325826ce131ca.tar.gz | |
("cyrillic-translit"): Add two rules "//'" and
"//`" for combining accents as a separate character. Keep two
rules "i`" and "I`" for characters where accent is not a separate
character. Revert changes that added postfix combining accents.
Diffstat (limited to 'leim')
| -rw-r--r-- | leim/quail/cyrillic.el | 28 |
1 files changed, 11 insertions, 17 deletions
diff --git a/leim/quail/cyrillic.el b/leim/quail/cyrillic.el index 3bdea754edb..324d0d1c8dd 100644 --- a/leim/quail/cyrillic.el +++ b/leim/quail/cyrillic.el @@ -1034,7 +1034,7 @@ cyrillic ,Lv(B (I DECIMAL) = \"/i\", ,Lx(B (JE) = \"/j\", ("shch" ?,Li(B) ("sj" ?,Li(B) ("/sht" ?,Li(B) ("/t" ?,Li(B) ("~" ?,Lj(B) ("y" ?,Lk(B) ("'" ?,Ll(B) ("`" ?,Ll(B) - ("e\\" ?,Lm(B) ("@" ?,Lm(B) + ("e\\" ?,Lm(B) ("e'" ?,Lm(B) ("e`" ?,Lm(B) ("@" ?,Lm(B) ("yu" ?,Ln(B) ("ju" ?,Ln(B) ("ya" ?,Lo(B) ("ja" ?,Lo(B) ("q" ?,Lo(B) @@ -1050,31 +1050,25 @@ cyrillic ,Lv(B (I DECIMAL) = \"/i\", ,Lx(B (JE) = \"/j\", ("Shch" ?,LI(B) ("SHCH" ?,LI(B) ("Sj" ?,LI(B) ("SJ" ?,LI(B) ("/Sht" ?,LI(B) ("/SHT" ?,LI(B) ("/T" ?,LI(B) ("~~" ?,LJ(B) ("Y" ?,LK(B) ("''" ?,LL(B) - ("E\\" ?,LM(B) ("@@" ?,LM(B) + ("E\\" ?,LM(B) ("E'" ?,LM(B) ("E`" ?,LM(B) ("@@" ?,LM(B) ("Yu" ?,LN(B) ("YU" ?,LN(B) ("Ju" ?,LN(B) ("JU" ?,LN(B) ("Ya" ?,LO(B) ("YA" ?,LO(B) ("Ja" ?,LO(B) ("JA" ?,LO(B) ("Q" ?,LO(B) - ;; Combining accents - ("a'" [",LP$(O+Z(B"]) ("a`" [",LP$(O+\(B"]) - ("e'" [",LU$(O+Z(B"]) ("e`" [",LU$(O+\(B"]) - ("i'" [",LX$(O+Z(B"]) ("i`" [",LX$(O+\(B"]) - ("o'" [",L^$(O+Z(B"]) ("o`" [",L^$(O+\(B"]) - ("u'" [",Lc$(O+Z(B"]) ("u`" [",Lc$(O+\(B"]) - ("A'" [",L0$(O+Z(B"]) ("A`" [",L0$(O+\(B"]) - ("E'" [",L5$(O+Z(B"]) ("E`" [",L5$(O+\(B"]) - ("I'" [",L8$(O+Z(B"]) ("I`" [",L8$(O+\(B"]) - ("O'" [",L>$(O+Z(B"]) ("O`" [",L>$(O+\(B"]) - ("U'" [",LC$(O+Z(B"]) ("U`" [",LC$(O+\(B"]) - - ("/e" ?,Lt(B) ("yi" ?,Lw(B) ("u~" ?,L~(B) + ("/e" ?,Lt(B) ("yi" ?,Lw(B) ("u'" ?,L~(B) ("u~" ?,L~(B) ("/d" ?,Lr(B) ("/ch" ?,L{(B) ("/g" ?,Ls(B) ("/s" ?,Lu(B) ("/k" ?,L|(B) ("/i" ?,Lv(B) ("/j" ?,Lx(B) ("/l" ?,Ly(B) ("/n" ?,Lz(B) ("/z" ?,L(B) - ("/E" ?,L$(B) ("YE" ?,L$(B) ("Yi" ?,L'(B) ("YI" ?,L'(B) ("U~" ?,L.(B) + ("/E" ?,L$(B) ("YE" ?,L$(B) ("Yi" ?,L'(B) ("YI" ?,L'(B) ("U'" ?,L.(B) ("U~" ?,L.(B) ("/D" ?,L"(B) ("/Ch" ?,L+(B) ("/CH" ?,L+(B) ("/G" ?,L#(B) ("/S" ?,L%(B) ("/K" ?,L,(B) ("/I" ?,L&(B) ("/J" ?,L((B) ("/L" ?,L)(B) ("/N" ?,L*(B) ("/Z" ?,L/(B) + ;; Combining accents as a separate character + ("//'" ?$(O+Z(B) ("//`" ?$(O+\(B) + + ;; In the following two rules the accent is not a separate character + ("i`" ?$,1(}(B) ("I`" ?$,1(-(B) + ("/-" ?$(G!9(B) ;; EN DASH ("/--" ?$(G!7(B) ;; EM DASH ("/*" ?$(O#@(B) ;; BULLET @@ -1099,7 +1093,7 @@ cyrillic ,Lv(B (I DECIMAL) = \"/i\", ,Lx(B (JE) = \"/j\", ("/c" ?,A)(B) ("/tm" ?$(D"o(B) ("/reg" ?,A.(B) - ("/eu" ?,b$(B) + ("/eu" ?,b$(B) ("/ce" ?,A"(B) ;; fractions |