]> code.delx.au - gnu-emacs/commitdiff
Remove redundant unicodes in
authorDave Love <fx@gnu.org>
Wed, 12 Jun 2002 16:46:15 +0000 (16:46 +0000)
committerDave Love <fx@gnu.org>
Wed, 12 Jun 2002 16:46:15 +0000 (16:46 +0000)
category-setting.

lisp/ChangeLog
lisp/language/lao-util.el
lisp/language/thai-util.el

index f306e471c8924a8273cc57826951081676c2cddb..f1e54b8496c94f81aeb11fa42e4e3d15f95e8d47 100644 (file)
@@ -1,3 +1,14 @@
+2002-06-12  Dave Love  <fx@gnu.org>
+
+       * language/thai-util.el: Remove redundant unicodes in
+       category-setting.
+
+       * language/lao-util.el: Remove redundant unicodes in
+       category-setting.
+
+       * international/mule-conf.el (japanese-jisx0213-1) 
+       (japanese-jisx0213-2): Add unify-map.
+
 2002-06-12  Kenichi Handa  <handa@etl.go.jp>
 
        * international/quail.el (quail-update-leim-list-file): Force
index 1639b1bf78b7e279a5e4b3c3a559263c59adc526..9a14e581e4aab8efabe4ba68b738d5be3d168d36 100644 (file)
@@ -4,7 +4,7 @@
 ;; Licensed to the Free Software Foundation.
 ;; Copyright (C) 2001 Free Software Foundation, Inc.
 
-;; Keywords: multilingual, Lao
+;; Keywords: multilingual, Lao, i18n
 
 ;; This file is part of GNU Emacs.
 
@@ -35,6 +35,8 @@
 (define-category ?v "Lao upper/lower vowel" lao-category-table)
 (define-category ?t "Lao tone" lao-category-table)
 
+;; Fixme: Should `invalid' entries below be preserved?  (See also
+;; thai-util.el.)
 (let ((l '((?\e(1!\e(B consonant "LETTER KOR  KAI'" "CHICKEN")
           (?\e(1"\e(B consonant "LETTER KHOR KHAI'" "EGG")
           (?\e(1#\e(B invalid nil)
           (?\e(1{\e(B invalid nil)
           (?\e(1|\e(B consonant "LETTER NHOR NHUU" "MOUSE")
           (?\e(1}\e(B consonant "LETTER MHOR MHAR" "DOG")
-          (?\e(1~\e(B invalid nil)
-          ;; Unicode equivalents
-          (?\e$,1D!\e(B consonant "LETTER KOR  KAI'" "CHICKEN")
-          (?\e$,1D"\e(B consonant "LETTER KHOR KHAI'" "EGG")
-          (?\e$,1D$\e(B consonant "LETTER QHOR QHWARGN" "BUFFALO")
-          (?\e$,1D'\e(B consonant "LETTER NGOR NGUU" "SNAKE")
-          (?\e$,1D(\e(B consonant "LETTER JOR JUA" "BUDDHIST NOVICE")
-          (?\e$,1D*\e(B consonant "LETTER XOR X\"ARNG" "ELEPHANT")
-          (?\e$,1D-\e(B consonant "LETTER YOR YUNG" "MOSQUITO")
-          (?\e$,1D4\e(B consonant "LETTER DOR DANG" "NOSE")
-          (?\e$,1D5\e(B consonant "LETTER TOR TAR" "EYE")
-          (?\e$,1D6\e(B consonant "LETTER THOR THUNG" "TO ASK,QUESTION")
-          (?\e$,1D7\e(B consonant "LETTER DHOR DHARM" "FLAG")
-          (?\e$,1D9\e(B consonant "LETTER NOR NOK" "BIRD")
-          (?\e$,1D:\e(B consonant "LETTER BOR BED" "FISHHOOK")
-          (?\e$,1D;\e(B consonant "LETTER POR PAR" "FISH")
-          (?\e$,1D<\e(B consonant "LETTER HPOR HPER\"" "BEE")
-          (?\e$,1D=\e(B consonant "LETTER FHOR FHAR" "WALL")
-          (?\e$,1D>\e(B consonant "LETTER PHOR PHUU" "MOUNTAIN")
-          (?\e$,1D?\e(B consonant "LETTER FOR FAI" "FIRE")
-          (?\e$,1DA\e(B consonant "LETTER MOR MAR\"" "HORSE")
-          (?\e$,1DB\e(B consonant "LETTER GNOR GNAR" "MEDICINE")
-          (?\e$,1DC\e(B consonant "LETTER ROR ROD" "CAR")
-          (?\e$,1DE\e(B consonant "LETTER LOR LIING" "MONKEY")
-          (?\e$,1DG\e(B consonant "LETTER WOR WII" "HAND FAN")
-          (?\e$,1DJ\e(B consonant "LETTER SOR SEA" "TIGER")
-          (?\e$,1DK\e(B consonant "LETTER HHOR HHAI" "JAR")
-          (?\e$,1DM\e(B consonant "LETTER OR OOW" "TAKE")
-          (?\e$,1DN\e(B consonant "LETTER HOR HEA" "BOAT")
-          (?\e$,1DO\e(B special "ELLIPSIS")
-          (?\e$,1DP\e(B vowel-base "VOWEL SIGN SARA A")
-          (?\e$,1DQ\e(B vowel-upper "VOWEL SIGN MAI KAN")
-          (?\e$,1DR\e(B vowel-base "VOWEL SIGN SARA AR")
-          (?\e$,1DS\e(B vowel-base "VOWEL SIGN SARA AM")
-          (?\e$,1DT\e(B vowel-upper "VOWEL SIGN SARA I") 
-          (?\e$,1DU\e(B vowel-upper "VOWEL SIGN SARA II")
-          (?\e$,1DV\e(B vowel-upper "VOWEL SIGN SARA EU")
-          (?\e$,1DW\e(B vowel-upper "VOWEL SIGN SARA UR")
-          (?\e$,1DX\e(B vowel-lower "VOWEL SIGN SARA U")
-          (?\e$,1DY\e(B vowel-lower "VOWEL SIGN SARA UU")
-          (?\e$,1D[\e(B vowel-upper "VOWEL SIGN MAI KONG")
-          (?\e$,1D\\e(B semivowel-lower "SEMIVOWEL SIGN LO")
-          (?\e$,1D]\e(B vowel-base "SEMIVOWEL SIGN SARA IA")
-          (?\e$,1D`\e(B vowel-base "VOWEL SIGN SARA EE")
-          (?\e$,1Da\e(B vowel-base "VOWEL SIGN SARA AA")
-          (?\e$,1Db\e(B vowel-base "VOWEL SIGN SARA OO")
-          (?\e$,1Dc\e(B vowel-base "VOWEL SIGN SARA EI MAI MUAN\"")
-          (?\e$,1Dd\e(B vowel-base "VOWEL SIGN SARA AI MAI MAY")
-          (?\e$,1Df\e(B special "KO LA (REPETITION)")
-          (?\e$,1Dh\e(B tone "TONE MAI EK")
-          (?\e$,1Di\e(B tone "TONE MAI THO")
-          (?\e$,1Dj\e(B tone "TONE MAI TI")
-          (?\e$,1Dk\e(B tone "TONE MAI JADTAWAR")
-          (?\e$,1Dl\e(B tone "CANCELLATION MARK")
-          (?\e$,1Dm\e(B vowel-upper "VOWEL SIGN SARA OR")
-          (?\e$,1Dp\e(B special "DIGIT ZERO")
-          (?\e$,1Dq\e(B special "DIGIT ONE")
-          (?\e$,1Dr\e(B special "DIGIT TWO")
-          (?\e$,1Ds\e(B special "DIGIT THREE")
-          (?\e$,1Dt\e(B special "DIGIT FOUR")
-          (?\e$,1Du\e(B special "DIGIT FIVE")
-          (?\e$,1Dv\e(B special "DIGIT SIX")
-          (?\e$,1Dw\e(B special "DIGIT SEVEN")
-          (?\e$,1Dx\e(B special "DIGIT EIGHT")
-          (?\e$,1Dy\e(B special "DIGIT NINE")
-          (?\e$,1D|\e(B consonant "LETTER NHOR NHUU" "MOUSE")
-          (?\e$,1D}\e(B consonant "LETTER MHOR MHAR" "DOG")))
+          (?\e(1~\e(B invalid nil)))
       elm)
   (while l
     (setq elm (car l) l (cdr l))
     ("\e(1S\e(B" (0 ?\e(1S\e(B))
 
     ;; Unicode equivalents
-    ("\e$,1DP\e(B" (0 ?\e$,1DP\e(B) (0 ?\e$,1DQ\e(B))
-    ("\e$,1DR\e(B" (0 ?\e$,1DR\e(B))
-    ("\e$,1DT\e(B" (0 ?\e$,1DU\e(B))
-    ("\e$,1DU\e(B" (0 ?\e$,1DU\e(B))
-    ("\e$,1DV\e(B" (0 ?\e$,1DV\e(B))
-    ("\e$,1DW\e(B" (0 ?\e$,1DW\e(B))
-    ("\e$,1DX\e(B" (0 ?\e$,1DX\e(B))
-    ("\e$,1DY\e(B" (0 ?\e$,1DY\e(B))
-    ("\e$,1D`DP\e(B" (?\e$,1D`\e(B 0 ?\e$,1DP\e(B) (?\e$,1D`\e(B 0 ?\e$,1DQ\e(B))
-    ("\e$,1D`\e(B" (?\e$,1D`\e(B 0))
-    ("\e$,1DaDP\e(B" (?\e$,1Da\e(B 0 ?\e$,1DP\e(B) (?\e$,1Da\e(B 0 ?\e$,1DQ\e(B))
-    ("\e$,1Da\e(B" (?\e$,1Da\e(B 0))
-    ("\e$,1DbDP\e(B" (?\e$,1Db\e(B 0 ?\e$,1DP\e(B) (0 ?\e$,1D[\e(B) (?\e$,1D-\e(B ?\e$,1Db\e(B 0 ?\e$,1DQ\e(B) (?\e$,1DG\e(B ?\e$,1Db\e(B 0 ?\e$,1DQ\e(B))
-    ("\e$,1Db\e(B" (?\e$,1Db\e(B 0))
-    ("\e$,1D`DRDP\e(B" (?\e$,1D`\e(B 0 ?\e$,1DR\e(B ?\e$,1DP\e(B) (0 ?\e$,1DQ\e(B ?\e$,1DM\e(B))
-    ("\e$,1Dm\e(B" (0 ?\e$,1Dm\e(B) (0 ?\e$,1DM\e(B))
-    ("\e$,1D`DT\e(B" (?\e$,1D`\e(B 0 ?\e$,1DT\e(B))
-    ("\e$,1D`DU\e(B" (?\e$,1D`\e(B 0 ?\e$,1DU\e(B))
-    ("\e$,1D[DGDP\e(B" (0 ?\e$,1D[\e(B ?\e$,1DG\e(B ?\e$,1DP\e(B) (0 ?\e$,1DQ\e(B ?\e$,1DG\e(B))
-    ("\e$,1D[DG\e(B" (0 ?\e$,1D[\e(B ?\e$,1DG\e(B) (0 ?\e$,1DG\e(B))
-    ("\e$,1D`DQD]DP\e(B" (?\e$,1D`\e(B 0 ?\e$,1DQ\e(B ?\e$,1D]\e(B ?\e$,1DP\e(B) (0 ?\e$,1DQ\e(B ?\e$,1D]\e(B))
-    ("\e$,1D`DQD]\e(B" (?\e$,1D`\e(B 0 ?\e$,1DQ\e(B ?\e$,1D]\e(B) (0 ?\e$,1D]\e(B))
-    ("\e$,1D`DVDM\e(B" (?\e$,1D`\e(B 0 ?\e$,1DV\e(B ?\e$,1DM\e(B))
-    ("\e$,1D`DWDM\e(B" (?\e$,1D`\e(B 0 ?\e$,1DW\e(B ?\e$,1DM\e(B))
-    ("\e$,1Dd\e(B" (?\e$,1Dd\e(B 0))
-    ("\e$,1Dc\e(B" (?\e$,1Dc\e(B 0))
-    ("\e$,1D`D[DR\e(B" (?\e$,1D`\e(B 0 ?\e$,1D[\e(B ?\e$,1DR\e(B))
-    ("\e$,1DS\e(B" (0 ?\e$,1DS\e(B)))
+    ("\e(1P\e(B" (0 ?\e(1P\e(B) (0 ?\e(1Q\e(B))
+    ("\e(1R\e(B" (0 ?\e(1R\e(B))
+    ("\e(1T\e(B" (0 ?\e(1U\e(B))
+    ("\e(1U\e(B" (0 ?\e(1U\e(B))
+    ("\e(1V\e(B" (0 ?\e(1V\e(B))
+    ("\e(1W\e(B" (0 ?\e(1W\e(B))
+    ("\e(1X\e(B" (0 ?\e(1X\e(B))
+    ("\e(1Y\e(B" (0 ?\e(1Y\e(B))
+    ("\e(1`P\e(B" (?\e(1`\e(B 0 ?\e(1P\e(B) (?\e(1`\e(B 0 ?\e(1Q\e(B))
+    ("\e(1`\e(B" (?\e(1`\e(B 0))
+    ("\e(1aP\e(B" (?\e(1a\e(B 0 ?\e(1P\e(B) (?\e(1a\e(B 0 ?\e(1Q\e(B))
+    ("\e(1a\e(B" (?\e(1a\e(B 0))
+    ("\e(1bP\e(B" (?\e(1b\e(B 0 ?\e(1P\e(B) (0 ?\e(1[\e(B) (?\e(1-\e(B ?\e(1b\e(B 0 ?\e(1Q\e(B) (?\e(1G\e(B ?\e(1b\e(B 0 ?\e(1Q\e(B))
+    ("\e(1b\e(B" (?\e(1b\e(B 0))
+    ("\e(1`RP\e(B" (?\e(1`\e(B 0 ?\e(1R\e(B ?\e(1P\e(B) (0 ?\e(1Q\e(B ?\e(1M\e(B))
+    ("\e(1m\e(B" (0 ?\e(1m\e(B) (0 ?\e(1M\e(B))
+    ("\e(1`T\e(B" (?\e(1`\e(B 0 ?\e(1T\e(B))
+    ("\e(1`U\e(B" (?\e(1`\e(B 0 ?\e(1U\e(B))
+    ("\e(1[GP\e(B" (0 ?\e(1[\e(B ?\e(1G\e(B ?\e(1P\e(B) (0 ?\e(1Q\e(B ?\e(1G\e(B))
+    ("\e(1[G\e(B" (0 ?\e(1[\e(B ?\e(1G\e(B) (0 ?\e(1G\e(B))
+    ("\e(1`Q]P\e(B" (?\e(1`\e(B 0 ?\e(1Q\e(B ?\e(1]\e(B ?\e(1P\e(B) (0 ?\e(1Q\e(B ?\e(1]\e(B))
+    ("\e(1`Q]\e(B" (?\e(1`\e(B 0 ?\e(1Q\e(B ?\e(1]\e(B) (0 ?\e(1]\e(B))
+    ("\e(1`VM\e(B" (?\e(1`\e(B 0 ?\e(1V\e(B ?\e(1M\e(B))
+    ("\e(1`WM\e(B" (?\e(1`\e(B 0 ?\e(1W\e(B ?\e(1M\e(B))
+    ("\e(1d\e(B" (?\e(1d\e(B 0))
+    ("\e(1c\e(B" (?\e(1c\e(B 0))
+    ("\e(1`[R\e(B" (?\e(1`\e(B 0 ?\e(1[\e(B ?\e(1R\e(B))
+    ("\e(1S\e(B" (0 ?\e(1S\e(B)))
   "Alist of Lao vowel string vs the corresponding re-ordering rule.
 Each element has this form:
        (VOWEL NO-MAA-SAKOD-RULE WITH-MAA-SAKOD-RULE (MAA-SAKOD-0 RULE-0) ...)
index 35914c2cc5b2430f61bc3e83907316496ce1f460..eaae6601c7d141a12b5573ff63afcfb661513a72 100644 (file)
@@ -2,8 +2,9 @@
 
 ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.
 ;; Licensed to the Free Software Foundation.
+;; Copyright (C) 2001 Free Software Foundation, Inc.
 
-;; Keywords: mule, multilingual, thai
+;; Keywords: mule, multilingual, Thai, i18n
 
 ;; This file is part of GNU Emacs.
 
           (?\e,T|\e(B invalid nil)                                               ; 0xFC
           (?\e,T}\e(B invalid nil)                                               ; 0xFD
           (?\e,T~\e(B invalid nil)                                               ; 0xFE
-
-          ;; Unicode equivalents
-          (?\e$,1Ba\e(B consonant "LETTER KO KAI")
-          (?\e$,1Bb\e(B consonant "LETTER KHO KHAI")
-          (?\e$,1Bc\e(B consonant "LETTER KHO KHUAT")
-          (?\e$,1Bd\e(B consonant "LETTER KHO KHWAI")
-          (?\e$,1Be\e(B consonant "LETTER KHO KHON")
-          (?\e$,1Bf\e(B consonant "LETTER KHO RAKHANG")
-          (?\e$,1Bg\e(B consonant "LETTER NGO NGU")
-          (?\e$,1Bh\e(B consonant "LETTER CHO CHAN")
-          (?\e$,1Bi\e(B consonant "LETTER CHO CHING")
-          (?\e$,1Bj\e(B consonant "LETTER CHO CHANG")
-          (?\e$,1Bk\e(B consonant "LETTER SO SO")
-          (?\e$,1Bl\e(B consonant "LETTER CHO CHOE")
-          (?\e$,1Bm\e(B consonant "LETTER YO YING")
-          (?\e$,1Bn\e(B consonant "LETTER DO CHADA")
-          (?\e$,1Bo\e(B consonant "LETTER TO PATAK")
-          (?\e$,1Bp\e(B consonant "LETTER THO THAN")
-          (?\e$,1Bq\e(B consonant "LETTER THO NANGMONTHO")
-          (?\e$,1Br\e(B consonant "LETTER THO PHUTHAO")
-          (?\e$,1Bs\e(B consonant "LETTER NO NEN")
-          (?\e$,1Bt\e(B consonant "LETTER DO DEK")
-          (?\e$,1Bu\e(B consonant "LETTER TO TAO")
-          (?\e$,1Bv\e(B consonant "LETTER THO THUNG")
-          (?\e$,1Bw\e(B consonant "LETTER THO THAHAN")
-          (?\e$,1Bx\e(B consonant "LETTER THO THONG")
-          (?\e$,1By\e(B consonant "LETTER NO NU")
-          (?\e$,1Bz\e(B consonant "LETTER BO BAIMAI")
-          (?\e$,1B{\e(B consonant "LETTER PO PLA")
-          (?\e$,1B|\e(B consonant "LETTER PHO PHUNG")
-          (?\e$,1B}\e(B consonant "LETTER FO FA")
-          (?\e$,1B~\e(B consonant "LETTER PHO PHAN")
-          (?\e$,1B\7f\e(B consonant "LETTER FO FAN")
-          (?\e$,1C \e(B consonant "LETTER PHO SAMPHAO")
-          (?\e$,1C!\e(B consonant "LETTER MO MA")
-          (?\e$,1C"\e(B consonant "LETTER YO YAK")
-          (?\e$,1C#\e(B consonant "LETTER RO RUA")
-          (?\e$,1C$\e(B vowel-base "LETTER RU (Pali vowel letter)")
-          (?\e$,1C%\e(B consonant "LETTER LO LING")
-          (?\e$,1C&\e(B vowel-base "LETTER LU (Pali vowel letter)")
-          (?\e$,1C'\e(B consonant "LETTER WO WAEN")
-          (?\e$,1C(\e(B consonant "LETTER SO SALA")
-          (?\e$,1C)\e(B consonant "LETTER SO RUSI")
-          (?\e$,1C*\e(B consonant "LETTER SO SUA")
-          (?\e$,1C+\e(B consonant "LETTER HO HIP")
-          (?\e$,1C,\e(B consonant "LETTER LO CHULA")
-          (?\e$,1C-\e(B consonant "LETTER O ANG")
-          (?\e$,1C.\e(B consonant "LETTER HO NOK HUK")
-          (?\e$,1C/\e(B special "PAI YAN NOI (abbreviation)")
-          (?\e$,1C0\e(B vowel-base "VOWEL SIGN SARA A")
-          (?\e$,1C1\e(B vowel-upper "VOWEL SIGN MAI HAN-AKAT N/S-T")
-          (?\e$,1C2\e(B vowel-base "VOWEL SIGN SARA AA")
-          (?\e$,1C3\e(B vowel-base "VOWEL SIGN SARA AM")
-          (?\e$,1C4\e(B vowel-upper "VOWEL SIGN SARA I N/S-T")
-          (?\e$,1C5\e(B vowel-upper "VOWEL SIGN SARA II N/S-T")
-          (?\e$,1C6\e(B vowel-upper "VOWEL SIGN SARA UE N/S-T")
-          (?\e$,1C7\e(B vowel-upper "VOWEL SIGN SARA UEE N/S-T")
-          (?\e$,1C8\e(B vowel-lower "VOWEL SIGN SARA U N/S-B")
-          (?\e$,1C9\e(B vowel-lower "VOWEL SIGN SARA UU N/S-B")
-          (?\e$,1C:\e(B vowel-lower "VOWEL SIGN PHINTHU N/S-B (Pali virama)")
-          (?\e$,1C?\e(B special "BAHT SIGN (currency symbol)")
-          (?\e$,1C@\e(B vowel-base "VOWEL SIGN SARA E")
-          (?\e$,1CA\e(B vowel-base "VOWEL SIGN SARA AE")
-          (?\e$,1CB\e(B vowel-base "VOWEL SIGN SARA O")
-          (?\e$,1CC\e(B vowel-base "VOWEL SIGN SARA MAI MUAN")
-          (?\e$,1CD\e(B vowel-base "VOWEL SIGN SARA MAI MALAI")
-          (?\e$,1CE\e(B vowel-base "LAK KHANG YAO")
-          (?\e$,1CF\e(B special "MAI YAMOK (repetion)")
-          (?\e$,1CG\e(B vowel-upper "VOWEL SIGN MAI TAI KHU N/S-T")
-          (?\e$,1CH\e(B tone "TONE MAI EK N/S-T")
-          (?\e$,1CI\e(B tone "TONE MAI THO N/S-T")
-          (?\e$,1CJ\e(B tone "TONE MAI TRI N/S-T")
-          (?\e$,1CK\e(B tone "TONE MAI CHATTAWA N/S-T")
-          (?\e$,1CL\e(B tone "THANTHAKHAT N/S-T (cancellation mark)")
-          (?\e$,1CM\e(B tone "NIKKHAHIT N/S-T (final nasal)")
-          (?\e$,1CN\e(B vowel-upper "YAMAKKAN N/S-T")
-          (?\e$,1CO\e(B special "FONRMAN")
-          (?\e$,1CP\e(B special "DIGIT ZERO")
-          (?\e$,1CQ\e(B special "DIGIT ONE")
-          (?\e$,1CR\e(B special "DIGIT TWO")
-          (?\e$,1CS\e(B special "DIGIT THREE")
-          (?\e$,1CT\e(B special "DIGIT FOUR")
-          (?\e$,1CU\e(B special "DIGIT FIVE")
-          (?\e$,1CV\e(B special "DIGIT SIX")
-          (?\e$,1CW\e(B special "DIGIT SEVEN")
-          (?\e$,1CX\e(B special "DIGIT EIGHT")
-          (?\e$,1CY\e(B special "DIGIT NINE")
-          (?\e$,1CZ\e(B special "ANGKHANKHU (ellipsis)")
-          (?\e$,1C[\e(B special "KHOMUT (beginning of religious texts)")
           ))
       elm)
   (while l