From: tomo Date: Thu, 20 Sep 2007 11:50:46 +0000 (+0000) Subject: (shuowen-radicals): Add ?烏; add ?丶, ?丹, ?青, ?井, ?皀, ?鬯, ?食, X-Git-Tag: chise-base-0_24^20~149 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=94df3662eb5d927a3f2af775d1aa57ee1e47c7b7;p=chise%2Fxemacs-chise.git.1 (shuowen-radicals): Add ?烏; add ?丶, ?丹, ?青, ?井, ?皀, ?鬯, ?食, ?亼, ?會, ?倉, ?入, ?缶, ?矢, ?高, ?冂, ?𩫏, ?京, ?亯, ?畗, ?𣆪, ?㐭, ?𠾂, ?來, ?麥, ?夊, ?舛, ?䑞, ?韋, ?弟, ?夂, ?久 and ?桀. --- diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el index 49851fb..562ccce 100644 --- a/lisp/utf-2000/char-db-util.el +++ b/lisp/utf-2000/char-db-util.el @@ -85,13 +85,17 @@ ?聿 ?畫 ?隶 ?堅 ?臣 ?殳 ?殺 ?𠘧 ?寸 ?皮 ; 090 ?ã¼± ?攴 ?敎 ?卜 ?用 ?爻 ?㸚 ?𥄎 ?目 ?䀠 ; 100 ?眉 ?盾 ?自 ?白 ?é¼» ?皕 ?習 ?ç¾½ ?隹 ?奞 ; 110 - ?萑 ?𦫳 ?苜 ?羊 ?ç¾´ ?瞿 ?雔 ?雥 ?é³¥ ?𠦒 ; 120 - ?冓 ?幺 ?𢆶 ?叀 ?玄 ?予 ?放 ?𠬪 ?𣦼 ?æ­º ; 130 - ?æ­» ?冎 ?骨 ?肉 ?筋 ?刀 ?刃 ?㓞 ?丰 ?耒 ; 140 - ?𧢲 ?竹 ?箕 ?丌 ?å·¦ ?å·¥ ?ã ­ ?å·« ?甘 ?曰 ; 150 - ?乃 ?丂 ?可 ?兮 ?号 ?亏 ?旨 ?喜 ?壴 ?鼓 ; 160 - ?豈 ?豆 ?豊 ?豐 ?䖒 ?虍 ?虎 ?虤 ?皿 ?𠙴 ; 170 - ?去 ?血]) + ?萑 ?𦫳 ?苜 ?羊 ?ç¾´ ?瞿 ?雔 ?雥 ?é³¥ ?烏 ; 120 + ?𠦒 ?冓 ?幺 ?𢆶 ?叀 ?玄 ?予 ?放 ?𠬪 ?𣦼 ; 130 + ?æ­º ?æ­» ?冎 ?骨 ?肉 ?筋 ?刀 ?刃 ?㓞 ?丰 ; 140 + ?耒 ?𧢲 ?竹 ?箕 ?丌 ?å·¦ ?å·¥ ?ã ­ ?å·« ?甘 ; 150 + ?曰 ?乃 ?丂 ?可 ?兮 ?号 ?亏 ?旨 ?喜 ?壴 ; 160 + ?鼓 ?豈 ?豆 ?豊 ?豐 ?䖒 ?虍 ?虎 ?虤 ?皿 ; 170 + ?𠙴 ?去 ?血 ?丶 ?丹 ?青 ?井 ?皀 ?鬯 ?食 ; 180 + ?亼 ?會 ?倉 ?入 ?缶 ?矢 ?高 ?冂 ?𩫏 ?京 ; 190 + ?亯 ?畗 ?𣆪 ?㐭 ?𠾂 ?來 ?麥 ?夊 ?舛 ?䑞 ; 200 + ?韋 ?弟 ?夂 ?久 ?桀 + ]) (defun shuowen-radical (number) (aref shuowen-radicals (1- number)))