Commit 9a03a6f4 authored by Simon Marshall's avatar Simon Marshall
Browse files

Resync mail aliases if necessary.

parent fd23afbe
......@@ -289,6 +289,13 @@ if it is quoted with double-quotes."
Completable headers are according to `mail-complete-alist'. If none matches
current header, calls `mail-complete-function' and passes prefix arg if any."
(interactive "P")
;; Read the defaults first, if we have not done so.
(if (eq mail-aliases t)
(setq mail-aliases nil)
(if (file-exists-p mail-personal-alias-file)
(let ((list mail-complete-alist))
(if (and (save-excursion (search-forward
(concat "\n" mail-header-separator "\n")
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment