Mercurial > emacs
changeset 89234:bc01e3bbf51a
("turkish-latin-3-postfix"): Make it
just an alias for turkish-postfix.
author | Dave Love <fx@gnu.org> |
---|---|
date | Wed, 16 Oct 2002 23:08:09 +0000 |
parents | 3c29ed9baa78 |
children | 9ef26b673370 |
files | leim/quail/latin-post.el |
diffstat | 1 files changed, 5 insertions(+), 62 deletions(-) [+] |
line wrap: on
line diff
--- a/leim/quail/latin-post.el Wed Oct 16 23:02:26 2002 +0000 +++ b/leim/quail/latin-post.el Wed Oct 16 23:08:09 2002 +0000 @@ -1372,68 +1372,6 @@ ) (quail-define-package - "turkish-latin-3-postfix" "Turkish" "TR3<" t - "Turkish (Türkçe) 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, ı, İ, i. - -A^ -> Â -C, -> Ç -G^ -> Ğ -I -> I -i -> ı -I. -> İ -i. -> i -O\" -> Ö -S, -> Ş -U\" -> Ü -U^ -> Û - -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^" ?Â) - ("a^" ?â) - ("C," ?Ç) - ("c," ?ç) - ("G^" ?Ğ) - ("g^" ?ğ) - ("I." ?İ) - ("i" ?ı) - ("i." ?i) - ("O\"" ?Ö) - ("o\"" ?ö) - ("S," ?Ş) - ("s," ?ş) - ("U\"" ?Ü) - ("u\"" ?ü) - ("U^" ?Û) - ("u^" ?û) - - ("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 "turkish-postfix" "Turkish" "TR<" t "Turkish (Türkçe) input method with postfix modifiers. @@ -1496,6 +1434,11 @@ ("u^^" ["u^"]) ) +;; Backwards compatibility. +(push (cons "turkish-latin-3-postfix" + (cdr (assoc "turkish-postfix" input-method-alist))) + input-method-alist) + (quail-define-package "british" "Latin-1" "£@" t "British English input method with Latin-1 character £ (# -> £)"