diff options
-rw-r--r-- | lisp/mail/mailalias.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/mailalias.el b/lisp/mail/mailalias.el index 4be47f49f0d..ca788757cf1 100644 --- a/lisp/mail/mailalias.el +++ b/lisp/mail/mailalias.el @@ -170,7 +170,7 @@ An address can contain spaces if it is quoted with double-quotes." (if (eq mail-aliases t) (progn (setq mail-aliases nil) - (if (file-exists-p "~/.mailrc") + (if (file-exists-p (or (getenv "MAILRC") "~/.mailrc")) (build-mail-aliases)))) ;; strip garbage from front and end (if (string-match "\\`[ \t\n,]+" definition) |