From: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Date: Tue, 28 Apr 2015 02:26:56 +0000 (-0400)
Subject: Change default location of EUDC options file
X-Git-Tag: emacs-25.0.90~2274
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7d947e84f335e351aa5b959934e584aeecda4008;p=emacs.git

Change default location of EUDC options file

* NEWS: Document change to EUDC options file's default location.
* lisp/net/eudc-vars.el (eudc-options-file): Use
`locate-user-emacs-file' to change default options file location.
---

diff --git a/etc/NEWS b/etc/NEWS
index 1a1492b6697..5046d300d45 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -633,6 +633,9 @@ to avoid interfering with the kill ring.
 *** Custom variable `eudc-inline-expansion-format' defaults to
 "Firstname Surname <mail-address>".
 
+*** Custom variable `eudc-options-file' defaults to
+"~/.emacs.d/eudc-options".
+
 *** New custom variable `ldap-ldapsearch-password-prompt-regexp' to
 allow overriding the regular expression that recognizes the ldapsearch
 command line's password prompt.
diff --git a/lisp/net/eudc-vars.el b/lisp/net/eudc-vars.el
index 36a583daa4d..5e994a3a38f 100644
--- a/lisp/net/eudc-vars.el
+++ b/lisp/net/eudc-vars.el
@@ -312,9 +312,11 @@ arguments that should be passed to the program."
 			:inline t
 			(string :tag "Argument")))))
 
-(defcustom eudc-options-file "~/.eudc-options"
+(defcustom eudc-options-file
+  (locate-user-emacs-file "eudc-options" ".eudc-options")
   "A file where the `servers' hotlist is stored."
-  :type '(file :Tag "File Name:"))
+  :type '(file :Tag "File Name:")
+  :version "25.1")
 
 (defcustom eudc-mode-hook nil
   "Normal hook run on entry to EUDC mode."