diff options
| author | Thomas Fitzsimmons | 2015-04-27 22:26:56 -0400 |
|---|---|---|
| committer | Thomas Fitzsimmons | 2015-04-27 22:27:59 -0400 |
| commit | 7d947e84f335e351aa5b959934e584aeecda4008 (patch) | |
| tree | 4846d763d2e6d6df1aac24063e4caafc54932b8b | |
| parent | b09deaa5a9d54658f6432b0a5aa45c834e162c43 (diff) | |
| download | emacs-7d947e84f335e351aa5b959934e584aeecda4008.tar.gz emacs-7d947e84f335e351aa5b959934e584aeecda4008.zip | |
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.
| -rw-r--r-- | etc/NEWS | 3 | ||||
| -rw-r--r-- | lisp/net/eudc-vars.el | 6 |
2 files changed, 7 insertions, 2 deletions
| @@ -633,6 +633,9 @@ to avoid interfering with the kill ring. | |||
| 633 | *** Custom variable `eudc-inline-expansion-format' defaults to | 633 | *** Custom variable `eudc-inline-expansion-format' defaults to |
| 634 | "Firstname Surname <mail-address>". | 634 | "Firstname Surname <mail-address>". |
| 635 | 635 | ||
| 636 | *** Custom variable `eudc-options-file' defaults to | ||
| 637 | "~/.emacs.d/eudc-options". | ||
| 638 | |||
| 636 | *** New custom variable `ldap-ldapsearch-password-prompt-regexp' to | 639 | *** New custom variable `ldap-ldapsearch-password-prompt-regexp' to |
| 637 | allow overriding the regular expression that recognizes the ldapsearch | 640 | allow overriding the regular expression that recognizes the ldapsearch |
| 638 | command line's password prompt. | 641 | 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." | |||
| 312 | :inline t | 312 | :inline t |
| 313 | (string :tag "Argument"))))) | 313 | (string :tag "Argument"))))) |
| 314 | 314 | ||
| 315 | (defcustom eudc-options-file "~/.eudc-options" | 315 | (defcustom eudc-options-file |
| 316 | (locate-user-emacs-file "eudc-options" ".eudc-options") | ||
| 316 | "A file where the `servers' hotlist is stored." | 317 | "A file where the `servers' hotlist is stored." |
| 317 | :type '(file :Tag "File Name:")) | 318 | :type '(file :Tag "File Name:") |
| 319 | :version "25.1") | ||
| 318 | 320 | ||
| 319 | (defcustom eudc-mode-hook nil | 321 | (defcustom eudc-mode-hook nil |
| 320 | "Normal hook run on entry to EUDC mode." | 322 | "Normal hook run on entry to EUDC mode." |