X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fchar-db-util.el;h=3ff6ba9ace3052bfe8aa1d70703fec7f961dadcd;hb=b751ec4f5683dc6ae597c494ba8ca2a809205f8b;hp=ba965e22cd28e5c71608b38e96464c3952063729;hpb=189a10757da3e3a34ae2b147d32c7ff597be7edd;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index ba965e2..3ff6ba9 100644
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -168,6 +168,7 @@
     =hanyo-denshi/hg
     =hanyo-denshi/jt
     =hanyo-denshi/ks
+    =hanyo-denshi/tk
     ;; ==mj
     ;; ==adobe-japan1-0
     ;; ==adobe-japan1-1
@@ -326,6 +327,7 @@
     =shinjigen
     =ucs-var-001
     =ucs-var-002
+    =ucs-var-003
     =ucs-itaiji-001
     =ucs-itaiji-002
     =ucs-itaiji-003
@@ -713,6 +715,8 @@
 		     =mj ==mj ===mj =>>mj
 		     =zihai mojikyo))
 	"(%-18s . %06d)\t; %c")
+       ((memq name '(=hanyo-denshi/tk))
+	"(%-18s . %08d)\t; %c")
        ((>= (charset-dimension name) 2)
 	"(%-18s . #x%04X)\t; %c")
        (t