summaryrefslogtreecommitdiff
path: root/lisp/completion.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2007-06-13 00:04:04 +0000
committerChong Yidong <cyd@stupidchicken.com>2007-06-13 00:04:04 +0000
commit0e8a0445d2f736e59616c5c84ea47a40fc8636c7 (patch)
tree4b2b1fd281144d3e589f91be43adce1bf9f79c1a /lisp/completion.el
parentf7c94f43045af255bfc735fe467beddc2947bc17 (diff)
downloademacs-0e8a0445d2f736e59616c5c84ea47a40fc8636c7.tar.gz
(save-completions-file-name): Use user-emacs-directory.
Diffstat (limited to 'lisp/completion.el')
-rw-r--r--lisp/completion.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/completion.el b/lisp/completion.el
index 25b95852536..c9e27ab3091 100644
--- a/lisp/completion.el
+++ b/lisp/completion.el
@@ -301,9 +301,9 @@ See also `save-completions-retention-time'."
(let ((olddef (convert-standard-filename "~/.completions")))
(cond
((file-readable-p olddef) olddef)
- ((file-directory-p (convert-standard-filename "~/.emacs.d/"))
+ ((file-directory-p user-emacs-directory)
(convert-standard-filename
- (expand-file-name "completions" "~/.emacs.d/")))
+ (expand-file-name "completions" user-emacs-directory)))
(t olddef)))
"The filename to save completions to."
:type 'file