From 45dc1ceaf9468fe260aef3a04b8ca43d0ac26015 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 3 Sep 2004 02:26:12 +0000
Subject: [PATCH] (=daikanwa@rev1): Renamed from `=daikanwa-rev1'; specify
 `=daikanwa' as the mother; define `=daikanwa-rev1' as an
 alias for `=daikanwa@rev1'. (=daikanwa@rev2): Renamed from
 `=daikanwa-rev2'; specify `=daikanwa' as the mother; define
 `=daikanwa-rev2' as an alias for `=daikanwa@rev2'.

---
 lisp/mule/mule-conf.el |   22 +++++++++++++++-------
 1 file changed, 15 insertions(+), 7 deletions(-)

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index d2887cd..e553d06 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -265,7 +265,7 @@
 		  code-offset	#xE00000))
   (define-charset-alias 'ideograph-daikanwa '=daikanwa)
 
-  (make-charset '=daikanwa-rev1
+  (make-charset '=daikanwa@rev1
 		"Daikanwa dictionary (revised version)"
 		`(long-name	"Daikanwa Rev."
 		  chars		256
@@ -273,10 +273,13 @@
 		  columns	2
 		  graphic	2
 		  direction	l2r
-		  registry	"Daikanwa\\(\\.[0-9]+\\)?-2"))
-  (define-charset-alias 'ideograph-daikanwa-2 '=daikanwa-rev1)
+		  registry	"Daikanwa\\(\\.[0-9]+\\)?-2"
+		  mother	=daikanwa
+                  ))
+  (define-charset-alias 'ideograph-daikanwa-2 '=daikanwa@rev1)
+  (define-charset-alias '=daikanwa-rev1 '=daikanwa@rev1)
 
-  (make-charset '=daikanwa-rev2
+  (make-charset '=daikanwa@rev2
 		"Daikanwa dictionary (revised version 2)"
 		`(long-name	"Daikanwa"
 		  chars		256
@@ -285,9 +288,14 @@
 		  graphic	2
 		  direction	l2r
 		  registry	"Daikanwa\\(\\.[0-9]+\\)?-3"
-		  min-code	#xE00000
-		  max-code	,(+ #xE00000 50100)
-		  code-offset	#xE00000))
+		  mother	=daikanwa
+		  min-code	1
+                  max-code	49964
+                  ;; min-code	#xE00000
+                  ;; max-code	,(+ #xE00000 50100)
+                  ;; code-offset	#xE00000
+		  ))
+  (define-charset-alias '=daikanwa-rev2 '=daikanwa@rev2)
 
   (make-charset '=big5-pua
 		"Big5 with private used area"
-- 
1.7.10.4