diff options
| -rw-r--r-- | lisp/mail/rmail.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index a40351c359c..5bffa4ef60d 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -545,7 +545,8 @@ Instead, these commands are available: | |||
| 545 | (setq rmail-inbox-list (rmail-parse-file-inboxes)) | 545 | (setq rmail-inbox-list (rmail-parse-file-inboxes)) |
| 546 | ;; Provide default set of inboxes for primary mail file ~/RMAIL. | 546 | ;; Provide default set of inboxes for primary mail file ~/RMAIL. |
| 547 | (and (null rmail-inbox-list) | 547 | (and (null rmail-inbox-list) |
| 548 | (equal buffer-file-name (expand-file-name rmail-file-name)) | 548 | (or (equal buffer-file-name (expand-file-name rmail-file-name)) |
| 549 | (equal buffer-file-truename (file-truename rmail-file-name))) | ||
| 549 | (setq rmail-inbox-list | 550 | (setq rmail-inbox-list |
| 550 | (or rmail-primary-inbox-list | 551 | (or rmail-primary-inbox-list |
| 551 | (list (or (getenv "MAIL") | 552 | (list (or (getenv "MAIL") |