From: Glenn Morris <rgm@gnu.org>
Date: Wed, 17 Jun 2015 06:26:16 +0000 (-0700)
Subject: * lisp/international/characters.el (char-script-table): Tweak
X-Git-Tag: emacs-25.0.90~1726
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c9e2003b44b446a2f994039d9fc73d387cf6a1df;p=emacs.git

* lisp/international/characters.el (char-script-table): Tweak

some ranges to better match the source.  (Bug#20789#17)
---

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index ad6a0d986a9..c4c9060d842 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -1297,8 +1297,9 @@ Setup char-width-table appropriate for non-CJK language environment."
 	 (#xFE30 #xFE4F han)
          (#xFE50 #xFE6F symbol)         ; Small Form Variants
 	 (#xFE70 #xFEFF arabic)		; Arabic Presentation Forms-B
-	 (#xFF00 #xFF5F cjk-misc)
+	 (#xFF00 #xFF60 cjk-misc)
 	 (#xFF61 #xFF9F kana)
+	 (#xFFA0 #xFFDF hangul)
 	 (#xFFE0 #xFFEF cjk-misc)
 	 (#x10000 #x100FF linear-b)
 	 (#x10100 #x1013F aegean-number)
@@ -1383,8 +1384,9 @@ Setup char-width-table appropriate for non-CJK language environment."
 	 (#x1F100 #x1F1FF symbol)	; Enclosed Alphanumeric Supplement
 	 (#x1F200 #x1F2FF han)		; Enclosed Ideographic Supplement
 	 (#x1F300 #x1F9FF symbol)
-	 (#x20000 #x2CEAF han)
-	 (#x2F800 #x2FFFF han)))
+	 (#x20000 #x2A6DF han)
+	 (#x2A700 #x2CEAF han)
+	 (#x2F800 #x2FA1F han)))
     (set-char-table-range char-script-table
 			  (cons (car elt) (nth 1 elt)) (nth 2 elt))
     (or (memq (nth 2 elt) script-list)