(shuowen-radicals): Add ?蓐, ?半, ?犛, ?癶, ?步, and ?此.

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index c8e6fc9..d776396 100644 (file)
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -75,8 +75,8 @@
 
 (defconst shuowen-radicals
   [?一 ?上 ?示 ?三 ?王 ?玉 ?玨 ?气 ?士 ?丨
-   ?屮 ?艸 ?茻 ?小 ?八 ?釆 ?牛 ?告 ?口 ?凵
-   ?吅 ?哭 ?走 ?止])
+   ?屮 ?艸 ?蓐 ?茻 ?小 ?八 ?釆 ?半 ?牛 ?犛
+   ?告 ?口 ?凵 ?吅 ?哭 ?走 ?止 ?癶 ?步 ?此])
 
 (defun shuowen-radical (number)
   (aref shuowen-radicals (1- number)))