From 0e8a0445d2f736e59616c5c84ea47a40fc8636c7 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 13 Jun 2007 00:04:04 +0000 Subject: [PATCH] (save-completions-file-name): Use user-emacs-directory. --- lisp/completion.el | 4 ++-- 1 file 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 -- 2.39.2