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.

2 files changed, 8 insertions, 6 deletions

diff --git a/lisp/international/fontset.el b/lisp/international/fontset.el
index 2579b839dd9..288eb86e5cd 100644
--- 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 1f93f6d5e05..4e60b818ced 100644
--- 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");