From 7da402caa8e23136c47367608e16b9cb52c6c1e7 Mon Sep 17 00:00:00 2001 From: tomo Date: Fri, 20 May 2005 18:05:35 +0000 Subject: [PATCH] (ids-dump-insert-daikanwa): Use `ids-dump-format-list' instead of `ids-format-list'. (ids-dump-insert-daikanwa-hokan): Likewise. --- ids-dump.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/ids-dump.el b/ids-dump.el index 8833b87..32ec4fc 100644 --- a/ids-dump.el +++ b/ids-dump.el @@ -102,7 +102,7 @@ (insert (format "M-%05d \t%c\t%s\n" i (decode-builtin-char 'ideograph-daikanwa i) - (or (ids-format-list + (or (ids-dump-format-list (get-char-attribute chr 'ideographic-structure)) "")))) (when (setq sal (assq i mdh-alist)) @@ -112,7 +112,7 @@ (insert (format "M-%05d'\t%c\t%s\n" i chr - (or (ids-format-list + (or (ids-dump-format-list (get-char-attribute chr 'ideographic-structure)) "")))) (when (setq chr (assq 2 sal)) @@ -120,7 +120,7 @@ (insert (format "M-%05d\"\t%c\t%s\n" i chr - (ids-format-list + (ids-dump-format-list (get-char-attribute chr 'ideographic-structure))))) ) (setq i (1+ i))))) @@ -141,7 +141,7 @@ (format "MH-%04d \t%c\t%s\n" (car cell) chr - (or (ids-format-list + (or (ids-dump-format-list (get-char-attribute chr 'ideographic-structure)) "")))))) -- 1.7.10.4