(g2-UU+5B73): Add `=decomposition@hanyo-denshi'.
[chise/xemacs-chise.git.1] / lisp / config.el
index 67d8f8c..50fdd03 100644 (file)
 ;;; Code:
 
 \f
-(defvar config-value-file (expand-file-name "config.values" exec-directory)
+(defvar config-value-file (expand-file-name "config.values" doc-directory)
   "File containing configuration parameters and their values.")
 
 (defvar config-value-hash-table nil
-  "Hashtable to store configuration parameters and their values.")
+  "Hash table to store configuration parameters and their values.")
 
 ;;;###autoload
 (defun config-value-hash-table ()
-  "Return hashtable of configuration parameters and their values."
+  "Return hash table of configuration parameters and their values."
   (when (null config-value-hash-table)
-    (setq config-value-hash-table (make-hashtable 300))
+    (setq config-value-hash-table (make-hash-table :size 300))
     (save-excursion
       (let ((buf (get-buffer-create " *Config*")))
        (set-buffer buf)