changeset 81341:62a65204ff7a

(save-completions-file-name): Use user-emacs-directory.
author Chong Yidong <cyd@stupidchicken.com>
date Wed, 13 Jun 2007 00:04:04 +0000
parents b612fb999814
children cabb2521cfd3
files lisp/completion.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/completion.el	Wed Jun 13 00:03:49 2007 +0000
+++ b/lisp/completion.el	Wed Jun 13 00:04:04 2007 +0000
@@ -301,9 +301,9 @@
   (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