From: tomo <tomo>
Date: Mon, 16 Dec 2002 16:20:52 +0000 (+0000)
Subject: (ids-dump-insert-daikanwa): Fixed problem about null definitions.
X-Git-Tag: ids-0_0-1~176
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=47c62f48fdd5f0667452cb4bbbc3ff57463740cb;p=chise%2Fids.git

(ids-dump-insert-daikanwa): Fixed problem about null definitions.
---

diff --git a/ids-dump.el b/ids-dump.el
index de48c6e..ceaa578 100644
--- a/ids-dump.el
+++ b/ids-dump.el
@@ -71,8 +71,9 @@
 	(insert
 	 (format "M-%05d \t%c\t%s\n"
 		 i (decode-builtin-char 'ideograph-daikanwa i)
-		 (ids-format-list
-		  (get-char-attribute chr 'ideographic-structure)))))
+		 (or (ids-format-list
+		      (get-char-attribute chr 'ideographic-structure))
+		     ""))))
       (when (setq sal (assq i mdh-alist))
 	(setq sal (cdr sal))
 	(when (setq chr (assq 1 sal))
@@ -80,8 +81,9 @@
 	  (insert
 	   (format "M-%05d'\t%c\t%s\n"
 		   i chr
-		   (ids-format-list
-		    (get-char-attribute chr 'ideographic-structure)))))
+		   (or (ids-format-list
+			(get-char-attribute chr 'ideographic-structure))
+		       ""))))
 	(when (setq chr (assq 2 sal))
 	  (setq chr (cdr chr))
 	  (insert