From: tomo Date: Mon, 26 Mar 2007 03:59:27 +0000 (+0000) Subject: (shuowen-radicals): Add 5 radicals. X-Git-Tag: r21-4-19-chise-0_23-4^20~157 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=8afec27e2a98fd9ab1e5f5d82761c4e282e2d46a;p=chise%2Fxemacs-chise.git- (shuowen-radicals): Add 5 radicals. --- diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el index baf563d..c8e6fc9 100644 --- a/lisp/utf-2000/char-db-util.el +++ b/lisp/utf-2000/char-db-util.el @@ -75,7 +75,8 @@ (defconst shuowen-radicals [?一 ?上 ?示 ?三 ?王 ?玉 ?玨 ?气 ?士 ?丨 - ?屮 ?艸 ?茻 ?小 ?八 ?釆 ?牛 ?告 ?口]) + ?屮 ?艸 ?茻 ?小 ?八 ?釆 ?牛 ?告 ?口 ?凵 + ?吅 ?哭 ?走 ?止]) (defun shuowen-radical (number) (aref shuowen-radicals (1- number)))