changeset 89235:9ef26b673370

("turkish-latin-3-alt-postfix"): Make it just an alias for turkish-alt-postfix.
author Dave Love <fx@gnu.org>
date Wed, 16 Oct 2002 23:09:41 +0000
parents bc01e3bbf51a
children a1a9214ed2f0
files leim/quail/latin-alt.el
diffstat 1 files changed, 6 insertions(+), 62 deletions(-) [+]
line wrap: on
line diff
--- a/leim/quail/latin-alt.el	Wed Oct 16 23:08:09 2002 +0000
+++ b/leim/quail/latin-alt.el	Wed Oct 16 23:09:41 2002 +0000
@@ -1406,68 +1406,6 @@
  )
 
 (quail-define-package
- "turkish-latin-3-alt-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-alt-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-alt-postfix" "Turkish" "TR«" t
  "Turkish (Türkçe) input method with postfix modifiers.
 
@@ -1530,6 +1468,12 @@
  ("u^^" ["u^"])
  )
 
+;; Backwards compatibility.
+(push (cons "turkish-latin-3-alt-postfix"
+	    (cdr (assoc "turkish-alt-postfix" input-method-alist)))
+      input-method-alist)
+
+
 ;; Dutch Quail input method derived from the one in Yudit by Roman
 ;; Czyborra.
 (quail-define-package