From: tomo <tomo>
Date: Wed, 13 Oct 2004 13:46:29 +0000 (+0000)
Subject: (dump-cns-11643-1-to-ucs-table): New function.
X-Git-Tag: chise-base-0_23~25
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f5fb9a0a3f5c40159b32178d1e40cc1dec339d44;p=chise%2Ftomoyo-tools.git

(dump-cns-11643-1-to-ucs-table): New function.
(dump-cns-11643-2-to-ucs-table): New function.
---

diff --git a/dump-tables.el b/dump-tables.el
index dc1e685..2cadfbc 100644
--- a/dump-tables.el
+++ b/dump-tables.el
@@ -1,6 +1,6 @@
 ;;; dump-tables.el --- Dump utility of mapping tables
 
-;; Copyright (C) 2002,2003 MORIOKA Tomohiko
+;; Copyright (C) 2002,2003,2004 MORIOKA Tomohiko
 
 ;; Author: MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
 ;; Keywords: Ideographs, Character Database, CHISE, UCS, Unicode
@@ -111,6 +111,20 @@
    'japanese-jisx0213-2 "JX2-" 'jis "JU+"))
 
 ;;;###autoload
+(defun dump-cns-11643-1-to-ucs-table (filename)
+  (interactive "Fdump C1-to-UCS : ")
+  (dump-94x94-ccs-to-ucs-table
+   filename "C1-to-UCS.txt"
+   'chinese-cns11643-1 "C1-" 'cns "CU+"))
+
+;;;###autoload
+(defun dump-cns-11643-2-to-ucs-table (filename)
+  (interactive "Fdump C2-to-UCS : ")
+  (dump-94x94-ccs-to-ucs-table
+   filename "C2-to-UCS.txt"
+   'chinese-cns11643-2 "C2-" 'cns "CU+"))
+
+;;;###autoload
 (defun dump-cns-11643-3-to-ucs-table (filename)
   (interactive "Fdump C3-to-UCS : ")
   (dump-94x94-ccs-to-ucs-table