X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fchar-db-util.el;h=537abae0b6b08da2b4c60fdff9d9c4c39935af42;hb=802def081c4df46101fd5319c4b7a2fcb90d387f;hp=6dea14fbad0b2e2ce575b59e2256bcdacf7228a0;hpb=3120d08093dbf2fc7116193985d326e9a6e63c26;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index 6dea14f..537abae 100644
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -493,7 +493,7 @@
        ((or (memq name '(=daikanwa =>>daikanwa =>daikanwa
 			 =daikanwa@rev1 =daikanwa@rev2
 			 =daikanwa/+p =>>daikanwa/+p
-			 =daikanwa/+2p
+			 =daikanwa/+2p =>>daikanwa/+2p
 			 =gt =>>>gt =>>gt =+>gt =>gt
 			 =gt-k =>>gt-k =>gt-k
 			 =adobe-japan1-0 =>>>adobe-japan1-0 =>>adobe-japan1-0
@@ -509,7 +509,7 @@
             ;; (string-match "^=adobe-" (symbol-name name))
 	    )
 	"(%-18s . %05d)\t; %c")
-       ((memq name '(=hanyo-denshi/ks =>>hanyo-denshi/ks mojikyo))
+       ((memq name '(=hanyo-denshi/ks =>>>hanyo-denshi/ks =>>hanyo-denshi/ks mojikyo))
 	"(%-18s . %06d)\t; %c")
        ((>= (charset-dimension name) 2)
 	"(%-18s . #x%04X)\t; %c")