[Emacs-diffs] master 76f2d76: Update char-script-table

[Eli Zaretskii]

branch: master
commit 76f2d766ad6691eae6ae4006264f59724cc73a23
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    Update char-script-table
    
    * lisp/international/characters.el (char-script-table): Update
    from Unicode 8.0 Draft.
---
 lisp/international/characters.el |   26 +++++++++++++++++++-------
 1 files changed, 19 insertions(+), 7 deletions(-)

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index 247a10d..f70a328 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -1172,6 +1172,8 @@ Setup char-width-table appropriate for non-CJK language 
environment."
 ;;
 ;; The Unicode blocks actually extend past some of these ranges with
 ;; undefined codepoints.
+;;
+;; Last update: http://www.unicode.org/Public/8.0.0/ucd/Blocks-8.0.0d3.txt
 (let ((script-list nil))
   (dolist
       (elt
@@ -1181,7 +1183,7 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x02B0 #x036F latin)          ; Spacing Modifiers and Diacriticals
         (#x0370 #x03E1 greek)
         (#x03E2 #x03EF coptic)
-        (#x03F0 #x03F3 greek)
+        (#x03F0 #x03FF greek)
         (#x0400 #x052F cyrillic)
         (#x0530 #x058F armenian)
         (#x0590 #x05FF hebrew)
@@ -1225,7 +1227,7 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x1950 #x197F tai-le)
         (#x1980 #x19DF tai-lue)        ; New Tai Lue
         (#x19E0 #x19FF khmer)          ; Khmer Symbols
-        (#x1A00 #x1A00 buginese)
+        (#x1A00 #x1A1F buginese)
         (#x1A20 #x1AAF tai-tham)
         (#x1AB0 #x1AFF latin)          ; Combining Diacritical Marks Extended
         (#x1B00 #x1B7F balinese)
@@ -1259,7 +1261,7 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x31A0 #x31BF bopomofo)       ; Bopomofo Extended
         (#x31C0 #x31EF cjk-misc)       ; CJK Strokes
         (#x31F0 #x31FF kana)           ; Katakana Phonetic Extensions
-        (#x3200 #x9FAF han)
+        (#x3200 #x9FFF han)
         (#xA000 #xA4CF yi)
         (#xA4D0 #xA4FF lisu)
         (#xA500 #xA63F vai)
@@ -1282,6 +1284,7 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#xAAE0 #xAAFF meetei-mayek)   ; Meetei Mayek Extensions
         (#xAB00 #xAB2F ethiopic)       ; Ethiopic Extended-A
         (#xAB30 #xAB6F latin)          ; Latin Extended-E
+         (#xAB70 #xABBF cherokee)       ; Cherokee Supplement
         (#xABC0 #xABFF meetei-mayek)
         (#xAC00 #xD7FF hangul)
         (#xF900 #xFAFF han)
@@ -1289,12 +1292,14 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#xFB13 #xFB17 armenian)       ; Armenian ligatures
         (#xFB1D #xFB4F hebrew)         ; Alphabetic Presentation Forms
         (#xFB50 #xFDFF arabic)         ; Arabic Presentation Forms-A
+         (#xFE10 #xFE1F vertical-form)
         (#xFE20 #xFE2F latin)          ; Combining Half Marks
         (#xFE30 #xFE4F han)
+         (#xFE50 #xFE6F symbol)         ; Small Form Variants
         (#xFE70 #xFEFF arabic)         ; Arabic Presentation Forms-B
         (#xFF00 #xFF5F cjk-misc)
         (#xFF61 #xFF9F kana)
-        (#xFFE0 #xFFE6 cjk-misc)
+        (#xFFE0 #xFFEF cjk-misc)
         (#x10000 #x100FF linear-b)
         (#x10100 #x1013F aegean-number)
         (#x10140 #x1018F ancient-greek-number)
@@ -1313,11 +1318,12 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x10480 #x104AF osmanya)
         (#x10500 #x1052F elbasan)
         (#x10530 #x1056F caucasian-albanian)
-        (#x10600 #x106BF linear-a)
+        (#x10600 #x1077F linear-a)
         (#x10800 #x1083F cypriot-syllabary)
         (#x10840 #x1085F aramaic)
         (#x10860 #x1087F palmyrene)
         (#x10880 #x108AF nabataean)
+         (#x108E0 #x108FF hatran)
         (#x10900 #x1091F phoenician)
         (#x10920 #x1093F lydian)
         (#x10980 #x109FF meroitic)
@@ -1330,6 +1336,7 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x10B60 #x10B7F inscriptional-pahlavi)
         (#x10B80 #x10BAF psalter-pahlavi)
         (#x10C00 #x10C4F old-turkic)
+         (#x10C80 #x10CFF old-hungarian)
         (#x10E60 #x10E7F rumi-number)
         (#x11000 #x1107F brahmi)
         (#x11080 #x110CF kaithi)
@@ -1339,17 +1346,21 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x11180 #x111DF sharada)
         (#x111E0 #x111FF sinhala-archaic-number)
         (#x11200 #x1124F khojki)
+         (#x11280 #x112AF multani)
         (#x112B0 #x112FF khudawadi)
         (#x11300 #x1137F grantha)
         (#x11480 #x114DF tirhuta)
         (#x11580 #x115FF siddham)
         (#x11600 #x1165F modi)
         (#x11680 #x116CF takri)
+         (#x11700 #x1173F ahom)
         (#x118A0 #x118FF warang-citi)
         (#x11AC0 #x11AFF pau-cin-hau)
         (#x12000 #x123FF cuneiform)
         (#x12400 #x1247F cuneiform-numbers-and-punctuation)
+         (#x12400 #x1254F cuneiform)    ; Early Dynastic Cuneiform
         (#x13000 #x1342F egyptian)
+         (#x14400 #x1457F anatolian)
         (#x16800 #x16A3F bamum)
         (#x16A40 #x16A6F mro)
         (#x16AD0 #x16AFF bassa-vah)
@@ -1363,6 +1374,7 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x1D300 #x1D35F tai-xuan-jing-symbol)
         (#x1D360 #x1D37F counting-rod-numeral)
         (#x1D400 #x1D7FF mathematical)
+         (#x1D800 #x1DAAF sutton-sign-writing)
         (#x1E800 #x1E8DF mende-kikakui)
         (#x1EE00 #x1EEFF arabic)       ; Arabic Mathematical Alphabetic Symbols
         (#x1F000 #x1F02F mahjong-tile)
@@ -1370,8 +1382,8 @@ Setup char-width-table appropriate for non-CJK language 
environment."
         (#x1F0A0 #x1F0FF playing-cards)
         (#x1F100 #x1F1FF symbol)       ; Enclosed Alphanumeric Supplement
         (#x1F200 #x1F2FF han)          ; Enclosed Ideographic Supplement
-        (#x1F300 #x1F8FF symbol)
-        (#x20000 #x2B81F han)
+        (#x1F300 #x1F9FF symbol)
+        (#x20000 #x2CEAF han)
         (#x2F800 #x2FFFF han)))
     (set-char-table-range char-script-table
                          (cons (car elt) (nth 1 elt)) (nth 2 elt))