Mercurial > emacs
changeset 88778:45b498250bfb
Make korean-ksc5601 double-width.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Mon, 24 Jun 2002 18:25:30 +0000 |
| parents | 15101779a9a0 |
| children | 515ca7d12013 |
| files | lisp/international/characters.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/characters.el Mon Jun 24 18:25:16 2002 +0000 +++ b/lisp/international/characters.el Mon Jun 24 18:25:30 2002 +0000 @@ -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)