From: tomo <tomo>
Date: Wed, 21 Jul 2004 13:39:10 +0000 (+0000)
Subject: (Fsave_char_attribute_table): Don't use `save_charset_properties'.
X-Git-Tag: r21-4-15-chise-0_21-30-ccs-props^2~8
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=77c54524956a8f35710ffa721c0f30831d105dcc;p=chise%2Fxemacs-chise.git-

(Fsave_char_attribute_table): Don't use `save_charset_properties'.
---

diff --git a/src/chartab.c b/src/chartab.c
index 8d264a9..d955a1a 100644
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -3789,10 +3789,6 @@ char_attribute_system_db_file (Lisp_Object key_type, Lisp_Object attribute,
 }
 #endif /* not HAVE_LIBCHISE */
 
-#ifdef HAVE_LIBCHISE
-Lisp_Object save_charset_properties (Lisp_Object charset);
-#endif /* HAVE_LIBCHISE */
-
 DEFUN ("save-char-attribute-table", Fsave_char_attribute_table, 1, 1, 0, /*
 Save values of ATTRIBUTE into database file.
 */
@@ -3834,12 +3830,7 @@ Save values of ATTRIBUTE into database file.
       Lisp_Object (*filter)(Lisp_Object value);
 
       if ( !NILP (Ffind_charset (attribute)) )
-	{
-#ifdef HAVE_LIBCHISE
-	  save_charset_properties (attribute);
-#endif /* HAVE_LIBCHISE */
-	  filter = NULL;
-	}
+	filter = NULL;
       else if ( EQ (attribute, Qideographic_structure)
 	   || EQ (attribute, Q_identical)
 	   || EQ (attribute, Q_identical_from)