diff lisp/mail/rmail.el @ 5192:3fb665ab94c1

(rmail-variables): Abbreviate truename for comparison.
author Richard M. Stallman <rms@gnu.org>
date Fri, 26 Nov 1993 20:42:23 +0000
parents 1ada11e2d89a
children 89b71a85be3e
line wrap: on
line diff
--- a/lisp/mail/rmail.el	Fri Nov 26 20:14:14 1993 +0000
+++ b/lisp/mail/rmail.el	Fri Nov 26 20:42:23 1993 +0000
@@ -563,7 +563,8 @@
   ;; Provide default set of inboxes for primary mail file ~/RMAIL.
   (and (null rmail-inbox-list)
        (or (equal buffer-file-name (expand-file-name rmail-file-name))
-	   (equal buffer-file-truename (file-truename rmail-file-name)))
+	   (equal buffer-file-truename
+		  (abbreviate-file-name (file-truename rmail-file-name))))
        (setq rmail-inbox-list
 	     (or rmail-primary-inbox-list
 		 (list (or (getenv "MAIL")