From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 10 Dec 2013 02:42:48 +0000 (+0900)
Subject: (char-db-coded-charset-priority-list): Add `==daikanwa'.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=0ec1fc6c5d8247ee6c450e1a11c7fb05a7e71312;p=chise%2Fxemacs-chise.git-

(char-db-coded-charset-priority-list): Add `==daikanwa'.
(char-db-insert-ccs-feature): Support `==shinjigen@rev' and
`==daikanwa/+p'.
---

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