diff options
author | Dave Love <fx@gnu.org> | 2002-06-24 18:25:30 +0000 |
---|---|---|
committer | Dave Love <fx@gnu.org> | 2002-06-24 18:25:30 +0000 |
commit | 739a7985f6579c25c702bae8e7c6c94c77393ed0 (patch) | |
tree | db54a75442d56bc63fa48b51e733170b24480ec9 /lisp/international/characters.el | |
parent | 351697be12ba682d562a848158eb72f3b28d4e86 (diff) | |
download | emacs-739a7985f6579c25c702bae8e7c6c94c77393ed0.tar.gz |
Make korean-ksc5601 double-width.
Diffstat (limited to 'lisp/international/characters.el')
-rw-r--r-- | lisp/international/characters.el | 4 |
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) |