diff options
Diffstat (limited to 'lisp/mail/mailalias.el')
| -rw-r--r-- | lisp/mail/mailalias.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mail/mailalias.el b/lisp/mail/mailalias.el index 8e7aaf94937..1f688734d47 100644 --- a/lisp/mail/mailalias.el +++ b/lisp/mail/mailalias.el @@ -255,9 +255,9 @@ removed from alias expansions." By default, this is the file specified by `mail-personal-alias-file'." (interactive (list - (read-file-name (format "Read mail alias file (default %s): " - mail-personal-alias-file) - nil mail-personal-alias-file t))) + (read-file-name + (format-prompt "Read mail alias file" mail-personal-alias-file) + nil mail-personal-alias-file t))) (setq file (expand-file-name (or file mail-personal-alias-file))) ;; In case mail-aliases is t, make sure define-mail-alias ;; does not recursively call build-mail-aliases. |