master 609c9c5cd9 1/2: Add support for the Buhid and Tagbanwa scripts (bug#55610)

[Eli Zaretskii]

branch: master
commit 609c9c5cd9cae1d6fced971cd66f39530ab93136
Author: समीर सिंह Sameer Singh <lumarzeli30@gmail.com>
Commit: Eli Zaretskii <eliz@gnu.org>

    Add support for the Buhid and Tagbanwa scripts (bug#55610)
    
    * lisp/language/philippine.el ("Buhid"): New language environment.
    ("Tagbanwa"): New language environment.
    Add input methods for Buhid and Tagbanwa.
    Add sample text for Tagbanwa.
    * lisp/international/fontset.el (script-representative-chars)
    (setup-default-fontset): Support Buhid and Tagbanwa.
    * lisp/leim/quail/philippine.el ("buhid"): New input method.
    ("tagbanwa"): New input method.
    
    * etc/HELLO: Add a Tagbanwa greeting.
    * etc/NEWS: Announce the new language environments and their
    input methods.
---
 etc/HELLO                     |  1 +
 etc/NEWS                      |  2 ++
 lisp/international/fontset.el |  4 ++++
 lisp/language/philippine.el   | 17 +++++++++++++
 lisp/leim/quail/philippine.el | 56 +++++++++++++++++++++++++++++++++++++++++++
 5 files changed, 80 insertions(+)

diff --git a/etc/HELLO b/etc/HELLO
index b87dae90b2..a9653a4164 100644
--- a/etc/HELLO
+++ b/etc/HELLO
@@ -92,6 +92,7 @@ Syloti Nagri (ꠍꠤꠟꠐꠤ ꠘꠣꠉꠞꠤ)    ꠀꠌ꠆ꠍꠣꠟꠣꠝꠥ ꠀ
 Tamil (தமிழ்)  வணக்கம்
 Telugu (తెలుగు)        నమస్కారం
 Tagalog (ᜊᜌ᜔ᜊᜌᜒᜈ᜔)     ᜃᜓᜋᜓᜐ᜔ᜆ
+Tagbanwa (ᝦᝪᝯ) ᝫᝩᝬᝥ ᝣᝮᝧᝯ
 TaiViet (ꪁꪫꪱꪣ ꪼꪕ)      ꪅꪰꪙꫂ ꪨꪮꫂ ꪁꪫꪱ / ꪅꪽ ꪨꪷ ꪁꪫꪱ
 Thai (ภาษาไทย) สวัสดีครับ / สวัสดีค่ะ
 Tibetan (བོད་སྐད་)     བཀྲ་ཤིས་བདེ་ལེགས༎
diff --git a/etc/NEWS b/etc/NEWS
index 1fa2d086b9..0adb4e289a 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -820,6 +820,8 @@ corresponding language environments are:
 **** Modi script and language environment
 **** Baybayin script and Tagalog language environment
 **** Hanunoo script and language environment
+**** Buhid script and language environment
+**** Tagbanwa script and language environment
 
 ---
 *** The "Oriya" language environment was renamed to "Odia".
diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el
index 08a0101a5e..5967648f36 100644
--- a/lisp/international/fontset.el
+++ b/lisp/international/fontset.el
@@ -184,6 +184,8 @@
        (runic #x16A0)
         (tagalog #x1700)
         (hanunoo #x1720)
+        (buhid #x1740)
+        (tagbanwa #x1760)
        (khmer #x1780)
        (mongolian #x1826)
         (tai-le #x1950)
@@ -752,6 +754,8 @@
                    runic
                     tagalog
                     hanunoo
+                    buhid
+                    tagbanwa
                    symbol
                    braille
                    yi
diff --git a/lisp/language/philippine.el b/lisp/language/philippine.el
index 2a4b17a1c7..e52ad6912c 100644
--- a/lisp/language/philippine.el
+++ b/lisp/language/philippine.el
@@ -46,6 +46,23 @@ this language environment.")))
              (documentation . "\
 Philippine Language Hanunoo is supported in this language environment.")))
 
+(set-language-info-alist
+ "Buhid" '((charset unicode)
+           (coding-system utf-8)
+           (coding-priority utf-8)
+           (input-method . "buhid")
+           (documentation . "\
+Philippine Language Buhid is supported in this language environment.")))
+
+(set-language-info-alist
+ "Tagbanwa" '((charset unicode)
+             (coding-system utf-8)
+             (coding-priority utf-8)
+             (input-method . "tagbanwa")
+             (sample-text . "Tagbanwa (ᝦᝪᝯ)    ᝫᝩᝬᝥ ᝣᝮᝧᝯ")
+             (documentation . "\
+Philippine Languages Tagbanwa are supported in this language environment.")))
+
 ;; Tagalog composition rules
 (let ((akshara              "[\x1700-\x1711\x171F]")
       (vowel                "[\x1712\x1713]")
diff --git a/lisp/leim/quail/philippine.el b/lisp/leim/quail/philippine.el
index b9dcccea28..9afbdc354e 100644
--- a/lisp/leim/quail/philippine.el
+++ b/lisp/leim/quail/philippine.el
@@ -92,5 +92,61 @@
  ("N"  ?ᜥ)
  ("m"  ?ᜫ))
 
+(quail-define-package
+ "buhid" "Buhid" "ᝊᝓ" nil "Buhid phonetic input method."
+ nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("q"  ?₱)
+ ("w"  ?ᝏ)
+ ("r"  ?ᝍ)
+ ("t"  ?ᝆ)
+ ("y"  ?ᝌ)
+ ("u"  ?ᝓ)
+ ("U"  ?ᝂ)
+ ("i"  ?ᝒ)
+ ("I"  ?ᝁ)
+ ("p"  ?ᝉ)
+ ("a"  ?ᝀ)
+ ("s"  ?ᝐ)
+ ("d"  ?ᝇ)
+ ("g"  ?ᝄ)
+ ("h"  ?ᝑ)
+ ("j"  ?᜵)
+ ("J"  ?᜶)
+ ("k"  ?ᝃ)
+ ("l"  ?ᝎ)
+ ("b"  ?ᝊ)
+ ("n"  ?ᝈ)
+ ("N"  ?ᝅ)
+ ("m"  ?ᝋ))
+
+(quail-define-package
+ "tagbanwa" "Tagbanwa" "ᝦ" nil "Tagbanwa phonetic input method."
+ nil t t t t nil nil nil nil nil t)
+
+(quail-define-rules
+ ("q"  ?₱)
+ ("w"  ?ᝯ)
+ ("t"  ?ᝦ)
+ ("y"  ?ᝬ)
+ ("u"  ?ᝳ)
+ ("U"  ?ᝢ)
+ ("i"  ?ᝲ)
+ ("I"  ?ᝡ)
+ ("p"  ?ᝩ)
+ ("a"  ?ᝠ)
+ ("s"  ?ᝰ)
+ ("d"  ?ᝧ)
+ ("g"  ?ᝤ)
+ ("j"  ?᜵)
+ ("J"  ?᜶)
+ ("k"  ?ᝣ)
+ ("l"  ?ᝮ)
+ ("b"  ?ᝪ)
+ ("n"  ?ᝨ)
+ ("N"  ?ᝥ)
+ ("m"  ?ᝫ))
+
 (provide 'philippine)
 ;;; philippine.el ends here