Mercurial > emacs
changeset 25775:f80708f9a5bb
("turkish-latin-3-postfix"): Renamed from
turkish-postfix.
("turkish-postfix"): New Turkish input method which inserts
Latin-5 characters.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 20 Sep 1999 02:13:05 +0000 |
| parents | ccc7f2d178dd |
| children | 6787824e2b50 |
| files | leim/quail/latin-post.el |
| diffstat | 1 files changed, 68 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/leim/quail/latin-post.el Mon Sep 20 02:11:10 1999 +0000 +++ b/leim/quail/latin-post.el Mon Sep 20 02:13:05 1999 +0000 @@ -1367,8 +1367,11 @@ ) (quail-define-package - "turkish-postfix" "Latin-3" "TR<" t - "Turkish (T,C|(Brk,Cg(Be) input method with postfix modifiers + "turkish-latin-3-postfix" "Latin-3" "TR3<" t + "Turkish (T,C|(Brk,Cg(Be) input method with postfix modifiers. + +This is for those who use Latin-3 (ISO-8859-3) for Turkish. If you +use Latin-5 (ISO-8859-9), you should use \"turkish-postfix\" instead. Note for I, ,C9(B, ,C)(B, i. @@ -1426,6 +1429,69 @@ ) (quail-define-package + "turkish-postfix" "Latin-5" "TR<" t + "Turkish (T,M|(Brk,Mg(Be) input method with postfix modifiers. + +This is for those who use Latin-5 (ISO-8859-9) for Turkish. If you +use Latin-3 (ISO-8859-3), you should use \"turkish-latin-3-postfix\" +instead. + +Note for I, ,M}(B, ,M](B, i. + +A^ -> ,MB(B +C, -> ,MG(B +G^ -> ,MP(B +I -> I +i -> ,M}(B +I. -> ,M](B +i. -> i +O\" -> ,MV(B +S, -> ,M^(B +U\" -> ,M\(B +U^ -> ,M[(B + +Doubling the postfix separates the letter and postfix: e.g. a^^ -> a^ +" nil t nil nil nil nil nil nil nil nil t) + +(quail-define-rules + ("A^" ?,MB(B) + ("a^" ?,Mb(B) + ("C," ?,MG(B) + ("c," ?,Mg(B) + ("G^" ?,MP(B) + ("g^" ?,Mp(B) + ("I." ?,M](B) + ("i" ?,M}(B) + ("i." ?i) + ("O\"" ?,MV(B) + ("o\"" ?,Mv(B) + ("S," ?,M^(B) + ("s," ?,M~(B) + ("U\"" ?,M\(B) + ("u\"" ?,M|(B) + ("U^" ?,M[(B) + ("u^" ?,M{(B) + + ("A^^" ["A^"]) + ("a^^" ["a^"]) + ("C,," ["C,"]) + ("c,," ["c,"]) + ("G^^" ["G^"]) + ("g^^" ["g^"]) + ("I.." ["I."]) + ("i" ["i"]) + ("i.." ["i."]) + ("O\"\"" ["O\""]) + ("o\"\"" ["o\""]) + ("S,," ["S,"]) + ("s,," ["s,"]) + ("U\"\"" ["U\""]) + ("u\"\"" ["u\""]) + ("U^^" ["U^"]) + ("u^^" ["u^"]) + ) + +(quail-define-package "british" "Latin-1" ",A#(B@" t "British English input method with Latin-1 character ,A#(B (# -> ,A#(B)" nil t nil nil nil nil nil nil nil nil t)