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 £ (# -> £)"