diff --git a/lisp/language/ind-util.el b/lisp/language/ind-util.el index 8b1c3d69ae..7b11be60d5 100644 --- a/lisp/language/ind-util.el +++ b/lisp/language/ind-util.el @@ -277,6 +277,29 @@ (;; Inscript-extra (4) (#, $, ^, *, ]) "்ர" "ர்" "த்ர" nil nil))) +(defvar indian-tml-no-digits-base-table + '( + (;; VOWELS + (?அ nil) (?ஆ ?ா) (?இ ?ி) (?ஈ ?ீ) (?உ ?ு) (?ஊ ?ூ) + nil nil nil (?ஏ ?ே) (?எ ?ெ) (?ஐ ?ை) + nil (?ஓ ?ோ) (?ஒ ?ொ) (?ஔ ?ௌ) nil nil) + (;; CONSONANTS + ?க nil nil nil ?ங ;; GUTTRULS + ?ச nil ?ஜ nil ?ஞ ;; PALATALS + ?ட nil nil nil ?ண ;; CEREBRALS + ?த nil nil nil ?ந ?ன ;; DENTALS + ?ப nil nil nil ?ம ;; LABIALS + ?ய ?ர ?ற ?ல ?ள ?ழ ?வ ;; SEMIVOWELS + nil ?ஷ ?ஸ ?ஹ ;; SIBILANTS + nil nil nil nil nil nil nil nil ;; NUKTAS + "ஜ்ஞ" "க்ஷ") + (;; Misc Symbols + nil ?ஂ ?ஃ nil ?் nil nil) + (;; Digits + nil nil nil nil nil nil nil nil nil nil) + (;; Inscript-extra (4) (#, $, ^, *, ]) + "்ர" "ர்" "த்ர" nil nil))) + (defvar indian-base-table-to-language-alist '((indian-dev-base-table . "Devanagari") (indian-pnj-base-table . "Punjabi") @@ -286,6 +309,7 @@ (indian-tlg-base-table . "Telugu") (indian-knd-base-table . "Kannada") (indian-mlm-base-table . "Malayalam") + ;; TODO: Change this? (indian-tml-base-table . "Tamil"))) (defvar indian-itrans-v5-table @@ -557,6 +581,10 @@ (defvar indian-tml-itrans-v5-hash (indian-make-hash indian-tml-base-table indian-itrans-v5-table-for-tamil)) + +(defvar indian-tml-itrans-no-digits-v5-hash + (indian-make-hash indian-tml-no-digits-base-table + indian-itrans-v5-table-for-tamil)) ) (defmacro indian-translate-region (from to hashtable encode-p) diff --git a/lisp/language/indian.el b/lisp/language/indian.el index e0adb0de6c..ec0bcb9be9 100644 --- a/lisp/language/indian.el +++ b/lisp/language/indian.el @@ -92,7 +92,7 @@ are supported in this language environment.")) "Tamil" '((charset unicode) (coding-system utf-8) (coding-priority utf-8) - (input-method . "tamil-itrans") + (input-method . "tamil-itrans-nodig") (documentation . "\ South Indian Language Tamil is supported in this language environment.")) '("Indian")) diff --git a/lisp/leim/quail/indian.el b/lisp/leim/quail/indian.el index 23204c0cd3..7788efb941 100644 --- a/lisp/leim/quail/indian.el +++ b/lisp/leim/quail/indian.el @@ -284,9 +284,31 @@ (buffer-string)))) (if nil - (quail-define-package "tamil-itrans" "Tamil" "TmlIT" t "Tamil ITRANS")) + (quail-define-package "tamil-itrans" "Tamil" "TmlIT" t "Tamil ITRANS with digits")) (quail-define-indian-trans-package indian-tml-itrans-v5-hash "tamil-itrans" "Tamil" "TmlIT" + "Tamil transliteration by ITRANS method with Tamil digits. + +You can input characters using the following mapping tables. + Example: To enter வணக்கம், type vaNakkam. + +### Basic syllables (consonants + vowels) ### +\\ + +### Miscellaneous (various signs + digits) ### +\\ + +### Others (numerics + symbols) ### + +Characters below have no ITRANS method associated with them. +Their descriptions are included for easy reference. +\\ + +Full key sequences are listed below:") +(if nil + (quail-define-package "tamil-itrans-nodig" "Tamil" "TmlITN" t "Tamil ITRANS")) +(quail-define-indian-trans-package + indian-tml-itrans-no-digits-v5-hash "tamil-itrans-nodig" "Tamil" "TmlITN" "Tamil transliteration by ITRANS method. You can input characters using the following mapping tables. @@ -473,10 +495,16 @@ Full key sequences are listed below:") (quail-defrule "X" ?​) (if nil - (quail-define-package "tamil-inscript" "Tamil" "TmlIS" t "Tamil keyboard Inscript")) + (quail-define-package "tamil-inscript" "Tamil" "TmlIS" t "Tamil keyboard Inscript with Tamil digits")) (quail-define-inscript-package indian-tml-base-table inscript-tml-keytable "tamil-inscript" "Tamil" "TmlIS" + "Tamil keyboard Inscript with Tamil digits.") +(if nil + (quail-define-package "tamil-inscript-nodig" "Tamil" "TmlISN" t "Tamil keyboard Inscript")) +(quail-define-inscript-package + indian-tml-no-digits-base-table inscript-tml-keytable + "tamil-inscript-nodig" "Tamil" "TmlISN" "Tamil keyboard Inscript.") ;; Probhat Input Method