From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 6 Jul 1993 22:39:56 +0000 (+0000)
Subject: (rmail-variables): Compare truename as well as given name
X-Git-Tag: emacs-19.34~11841
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6cd37f8f5fea8076eb56af74ce5316a5bddedd7b;p=emacs.git

(rmail-variables): Compare truename as well as given name
against rmail-file-name.
---

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:
   (setq rmail-inbox-list (rmail-parse-file-inboxes))
   ;; Provide default set of inboxes for primary mail file ~/RMAIL.
   (and (null rmail-inbox-list)
-       (equal buffer-file-name (expand-file-name rmail-file-name))
+       (or (equal buffer-file-name (expand-file-name rmail-file-name))
+	   (equal buffer-file-truename (file-truename rmail-file-name)))
        (setq rmail-inbox-list
 	     (or rmail-primary-inbox-list
 		 (list (or (getenv "MAIL")