Fix database related to some scripts

* lisp/international/fontset.el (script-representative-chars): Add
tai-le and tai-lue scripts.
(otf-script-alist): Fix the name of tai-le.

* src/w32font.c (syms_of_w32font): Fix typos in some script symbol
names.

diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el
index 2579b839dd9060fb9b6c75d6bdfe873bbc48a390..288eb86e5cd04cb73377b1cf38b8103f6a7d00d7 100644 (file)
--- a/lisp/international/fontset.el
+++ b/lisp/international/fontset.el
@@ -184,6 +184,8 @@
        (runic #x16A0)
        (khmer #x1780)
        (mongolian #x1826)
+        (tai-le #x1950)
+        (tai-lue #x1980)
         (tai-tham #x1A20 #x1A55 #x1A61 #x1A80)
        (symbol . [#x201C #x2200 #x2500])
        (braille #x2800)
@@ -439,7 +441,7 @@
        (syrc . syriac)
        (tglg . tagalog)
        (tagb . tagbanwa)
-       (tale . tai_le)
+       (tale . tai-le)
        (talu . tai-lue)
        (lana . tai-tham)
        (tavt . tai-viet)

diff --git a/src/w32font.c b/src/w32font.c
index 1f93f6d5e05db1cfd9a152a19b41ba428fe5717f..4e60b818ced139941ea3befcd3085d2f8e59a11d 100644 (file)
--- a/src/w32font.c
+++ b/src/w32font.c
@@ -2834,18 +2834,18 @@ syms_of_w32font (void)
   DEFSYM (Qhanunoo, "hanunoo");
   DEFSYM (Qkharoshthi, "kharoshthi");
   DEFSYM (Qlimbu, "limbu");
-  DEFSYM (Qlinear_b, "linear_b");
+  DEFSYM (Qlinear_b, "linear-b");
   DEFSYM (Qaegean_number, "aegean-number");
-  DEFSYM (Qold_italic, "old_italic");
-  DEFSYM (Qold_persian, "old_persian");
+  DEFSYM (Qold_italic, "old-italic");
+  DEFSYM (Qold_persian, "old-persian");
   DEFSYM (Qosmanya, "osmanya");
   DEFSYM (Qphags_pa, "phags-pa");
   DEFSYM (Qphoenician, "phoenician");
   DEFSYM (Qshavian, "shavian");
-  DEFSYM (Qsyloti_nagri, "syloti_nagri");
+  DEFSYM (Qsyloti_nagri, "syloti-nagri");
   DEFSYM (Qtagalog, "tagalog");
   DEFSYM (Qtagbanwa, "tagbanwa");
-  DEFSYM (Qtai_le, "tai_le");
+  DEFSYM (Qtai_le, "tai-le");
   DEFSYM (Qtifinagh, "tifinagh");
   DEFSYM (Qugaritic, "ugaritic");
   DEFSYM (Qlycian, "lycian");