From cf7c3423ec52a7b7a6f51e9d5a9228c57a88a855 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Mon, 27 Feb 2017 19:49:20 +0900 Subject: [PATCH] (isd-turtle-dump-ucs-ext-a): New function. --- isd-turtle.el | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/isd-turtle.el b/isd-turtle.el index 1113bcc..f20c817 100644 --- a/isd-turtle.el +++ b/isd-turtle.el @@ -188,7 +188,7 @@ (setq ret (find-char c3))) (setq c3 ret)) (cond - ((eq idc ?â¿°) + ((eq idc ?\u2FF0) ; â¿° (setq p1 'left p2 'right) ) @@ -305,6 +305,14 @@ #'isd-turtle-insert-ccs-ranges 'ucs '(#x4E00 . #x9FA5))) +;;;###autoload +(defun isd-turtle-dump-ucs-ext-a (filename) + (interactive "Fdump ISD-UCS-Ext-A : ") + (isd-turtle-dump-range "ISD-UCS-Ext-A.txt" filename + #'isd-turtle-insert-ccs-ranges + 'ucs '(#x3400 . #x4DB5) #xFA1F #xFA23)) + + ;;; @ End. ;;; -- 1.7.10.4