New file.

[chise/chiset.git] / char-db-turtle.el

diff --git a/char-db-turtle.el b/char-db-turtle.el
index da1be9f..f1cf5ba 100644 (file)
--- a/char-db-turtle.el
+++ b/char-db-turtle.el
@@ -67,6 +67,7 @@
     =ucs@unicode
     =ucs@JP/hanazono
     =gb12345
+    =ucs@cns
     =zinbun-oracle =>zinbun-oracle
     =daikanwa
     =ruimoku-v6
@@ -106,6 +107,7 @@
     ==gt
     ==cns11643-1 ==cns11643-2 ==cns11643-3
     ==cns11643-4 ==cns11643-5 ==cns11643-6 ==cns11643-7
+    ==jis-x0212
     ==ucs@cns
     ==koseki
     ==daikanwa
@@ -492,7 +494,7 @@
 
 (defun char-db-turtle-insert-source-list (value &optional readable)
   (let (lbs separator rest cell al cal key ret)
-    (setq lbs (concat "\n" (make-string (current-column) ?\ ))
+    (setq lbs (concat " ,\n" (make-string (current-column) ?\ ))
          separator nil)
     (while (consp value)
       (setq cell (car value))