summaryrefslogtreecommitdiff
path: root/lisp/language
diff options
context:
space:
mode:
authorसमीर सिंह Sameer Singh <lumarzeli30@gmail.com>2022-05-08 17:42:35 +0530
committerEli Zaretskii <eliz@gnu.org>2022-05-08 17:35:29 +0300
commit82f1f198c6b473c5f1169983d998f0779958d087 (patch)
treeebfff043591886951251e29938cdcdd9f68abb4b /lisp/language
parentb03d6265cd9427e11c5bfd4a56822b4475c8e8cd (diff)
downloademacs-82f1f198c6b473c5f1169983d998f0779958d087.tar.gz
emacs-82f1f198c6b473c5f1169983d998f0779958d087.tar.bz2
emacs-82f1f198c6b473c5f1169983d998f0779958d087.zip
Add support for the Tirhuta script
* lisp/language/indian.el ("Tirhuta"): New language environment. Add composition rules for Tirhuta. Add sample text and input method. * lisp/international/fontset.el (script-representative-chars) (setup-default-fontset): Support Tirhuta. * lisp/leim/quail/indian.el ("tirhuta"): New input method. * etc/HELLO: Add a Tirhuta greeting. * etc/NEWS: Announce the new language environment and its input method.
Diffstat (limited to 'lisp/language')
-rw-r--r--lisp/language/indian.el24
1 files changed, 24 insertions, 0 deletions
diff --git a/lisp/language/indian.el b/lisp/language/indian.el
index ce46d325494..922061c3b6a 100644
--- a/lisp/language/indian.el
+++ b/lisp/language/indian.el
@@ -147,6 +147,17 @@ Languages such as Awadhi, Bhojpuri, Magahi and Maithili
which used the Kaithi script are supported in this language environment."))
'("Indian"))
+(set-language-info-alist
+ "Tirhuta" '((charset unicode)
+ (coding-system utf-8)
+ (coding-priority utf-8)
+ (input-method . "tirhuta")
+ (sample-text . "Tirhuta (𑒞𑒱𑒩𑒯𑒳𑒞𑒰) 𑒣𑓂𑒩𑒢𑒰𑒧")
+ (documentation . "\
+Maithili language and its script Tirhuta is supported in this
+language environment."))
+ '("Indian"))
+
;; Replace mnemonic characters in REGEXP according to TABLE. TABLE is
;; an alist of (MNEMONIC-STRING . REPLACEMENT-STRING).
@@ -466,4 +477,17 @@ which used the Kaithi script are supported in this language environment."))
(provide 'indian)
+;; Tirhuta composition rules
+(let ((consonant "[\x1148F-\x114AF]")
+ (nukta "\x114C3")
+ (vowel "[\x114B0-\x114BE]")
+ (anusvara-candrabindu "[\x114BF\x114C0]")
+ (virama "\x114C2"))
+ (set-char-table-range composition-function-table
+ '(#x114B0 . #x114C3)
+ (list (vector
+ (concat consonant nukta "?\\(?:" virama consonant nukta "?\\)*\\(?:"
+ virama "\\|" vowel "*" nukta "?" anusvara-candrabindu "?\\)")
+ 1 'font-shape-gstring))))
+
;;; indian.el ends here