summaryrefslogtreecommitdiff
path: root/lisp/international/characters.el
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2002-06-24 18:25:30 +0000
committerDave Love <fx@gnu.org>2002-06-24 18:25:30 +0000
commit739a7985f6579c25c702bae8e7c6c94c77393ed0 (patch)
treedb54a75442d56bc63fa48b51e733170b24480ec9 /lisp/international/characters.el
parent351697be12ba682d562a848158eb72f3b28d4e86 (diff)
downloademacs-739a7985f6579c25c702bae8e7c6c94c77393ed0.tar.gz
Make korean-ksc5601 double-width.
Diffstat (limited to 'lisp/international/characters.el')
-rw-r--r--lisp/international/characters.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index bc2ed406486..0f0a71495cb 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -385,7 +385,6 @@
(modify-category-entry '(#xe80 . #xeff) ?o)
(map-charset-chars #'modify-category-entry 'lao ?o)
-;; Fixme: check this. Lao characters in HELLO seem to have all the categories
(let ((deflist '(("ກ-ຮ" "w" ?0) ; consonant
("ະາຳຽເ-ໄ" "w" ?1) ; vowel base
("ັິ-ືົໍ" "w" ?2) ; vowel upper
@@ -897,6 +896,9 @@
(map-charset-chars
(lambda (range ignore) (set-char-table-range char-width-table range 2))
'arabic-2-column)
+(map-charset-chars
+ (lambda (range ignore) (set-char-table-range char-width-table range 2))
+ 'korean-ksc5601)
(optimize-char-table (standard-case-table))
(optimize-char-table char-width-table)