Prefer Daijiten to Shinjigen.
authorMORIOKA Tomohiko <tomo.git@chise.org>
Fri, 15 Mar 2019 17:59:50 +0000 (02:59 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Fri, 15 Mar 2019 17:59:50 +0000 (02:59 +0900)
lisp/mule/mule-conf.el

index 0666324..b9d5bf8 100644 (file)
                  direction     l2r
                  mother        =>>daikanwa/ho))
 
+  (make-charset '=daijiten
+               "Daijiten dictionary glyphs"
+               `(long-name     "Daijiten dictionary"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                 registry      "Daijiten-*"
+                 min-code      #xE50000
+                 max-code      ,(+ #xE50000 14923)
+                 code-offset   #xE50000))
+  (make-charset '==daijiten
+               "Daijiten dictionary glyph-forms"
+               `(long-name     "Daijiten dictionary"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                 mother        =daijiten
+                 registry      "Daijiten-*"))
+  (make-charset '===daijiten
+               "Daijiten dictionary glyph-images"
+               `(long-name     "Daijiten dictionary"
+                 chars         256
+                 dimension     2
+                 columns       2
+                 graphic       2
+                 direction     l2r
+                 mother        ==daijiten
+                 registry      "Daijiten-*"))
+
   (make-charset '=shinjigen
                "Kadokawa ShinJigen dictionary (common parts)"
                `(long-name     "Shinjigen common parts"
            hzk-max (+ hzk-min 65535))
       (setq i (1+ i))))
 
-  (make-charset '=daijiten
-               "Daijiten dictionary glyphs"
-               `(long-name     "Daijiten dictionary"
-                 chars         256
-                 dimension     2
-                 columns       2
-                 graphic       2
-                 direction     l2r
-                 registry      "Daijiten-*"
-                 min-code      #xE50000
-                 max-code      ,(+ #xE50000 14923)
-                 code-offset   #xE50000))
-  (make-charset '==daijiten
-               "Daijiten dictionary glyph-forms"
-               `(long-name     "Daijiten dictionary"
-                 chars         256
-                 dimension     2
-                 columns       2
-                 graphic       2
-                 direction     l2r
-                 mother        =daijiten
-                 registry      "Daijiten-*"))
-  (make-charset '===daijiten
-               "Daijiten dictionary glyph-images"
-               `(long-name     "Daijiten dictionary"
-                 chars         256
-                 dimension     2
-                 columns       2
-                 graphic       2
-                 direction     l2r
-                 mother        ==daijiten
-                 registry      "Daijiten-*"))
-
   (make-charset '===hng-jou "HNG:誠實論卷八(P.2179)"
                '(long-name "HNG/P2179"
                  chars         256