X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fchar-db-util.el;h=31e75dd8041d69145d112dba6d0f0652119aecfd;hb=0ec1fc6c5d8247ee6c450e1a11c7fb05a7e71312;hp=95561f758b90494cd203d76b378c4f4781c34e6c;hpb=0835c71f12e3a1964a462efbffe779533bc60918;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index 95561f7..31e75dd 100644
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -181,6 +181,7 @@
     =daikanwa
     =daikanwa@rev2
     =daikanwa@rev1
+    ==daikanwa
     =cbeta
     ideograph-hanziku-1
     ideograph-hanziku-2
@@ -590,7 +591,8 @@
        ((memq name '(==shinjigen
 		     =shinjigen
 		     =shinjigen@1ed
-		     =shinjigen@rev =shinjigen/+p@rev
+		     =shinjigen@rev ==shinjigen@rev
+		     =shinjigen/+p@rev
 		     =daikanwa/ho =>>daikanwa/ho =>daikanwa/ho))
 	"(%-18s .  %04d)\t; %c")
        ((eq name '=shinjigen@1ed/24pr)
@@ -598,7 +600,7 @@
        ((or (memq name '(==daikanwa
 			 =daikanwa =>>daikanwa =>daikanwa
 			 =daikanwa@rev1 =daikanwa@rev2
-			 =daikanwa/+p =>>daikanwa/+p
+			 =daikanwa/+p ==daikanwa/+p =>>daikanwa/+p
 			 =daikanwa/+2p =>>daikanwa/+2p
 			 =gt ==gt ; =>>>gt
 			 =>>gt =+>gt =>gt