(Vchise_db_directory): New variable.

(vars_of_chartab): Add new built-in variable `chise-db-directory'.

diff --git a/src/chartab.c b/src/chartab.c
index 7b1553b..3afd31d 100644 (file)
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -64,6 +64,8 @@ Lisp_Object Vword_combining_categories, Vword_separating_categories;
 
 \f
 #ifdef HAVE_LIBCHISE
+Lisp_Object Vchise_db_directory;
+
 CHISE_DS *default_chise_data_source = NULL;
 #endif
 
@@ -4435,6 +4437,13 @@ vars_of_chartab (void)
   DEFVAR_LISP ("char-db-stingy-mode", &Vchar_db_stingy_mode /*
 */ );
   Vchar_db_stingy_mode = Qt;
+#ifdef HAVE_LIBCHISE
+  Vchise_db_directory = build_string(chise_db_dir);
+  DEFVAR_LISP ("chise-db-directory", &Vchise_db_directory /*
+Directory of CHISE character database.
+*/ );
+
+#endif
 #endif /* HAVE_CHISE */
   /* DO NOT staticpro this.  It works just like Vweak_hash_tables. */
   Vall_syntax_tables = Qnil;