Commit e94be827 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

international/fontset.el (build-default-fontset-data): Exclude characters in...

international/fontset.el (build-default-fontset-data): Exclude characters in scripts kana, hangul, han, or cjk-misc.
parent 32d59dc3
2010-01-08 Kenichi Handa <handa@m17n.org>
* international/fontset.el (build-default-fontset-data): Exclude
characters in scripts kana, hangul, han, or cjk-misc.
2010-01-06 Jan Djärv <jan.h.d@swipnet.se>
* font-setting.el (font-setting-change-default-font): Use user-spec
......
......@@ -361,8 +361,10 @@
(let ((from (car range)) (to (cdr range)))
(if (< to #x110000)
(while (<= from to)
(aset cjk-table from
(logior (or (aref cjk-table from) 0) mask))
(or (memq (aref char-script-table from)
'(kana hangul han cjk-misc))
(aset cjk-table from
(logior (or (aref cjk-table from) 0) mask)))
(setq from (1+ from))))))
(nth 1 elt) nil (nth 2 elt) (nth 3 elt)))
(setq i (1+ i)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment