projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Complement representative nodes of `=adobe-japan1-4' glyphs.
[chise/xemacs-chise.git-]
/
lisp
/
config.el
diff --git
a/lisp/config.el
b/lisp/config.el
index
67d8f8c
..
50fdd03
100644
(file)
--- a/
lisp/config.el
+++ b/
lisp/config.el
@@
-29,17
+29,17
@@
;;; Code:
\f
;;; 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
"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 ()
;;;###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)
(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)
(save-excursion
(let ((buf (get-buffer-create " *Config*")))
(set-buffer buf)