diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-04-28 03:01:49 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-04-28 03:01:49 +0000 |
| commit | 6875cf75e59086ca87d1d67c01fe2bf1da3cded1 (patch) | |
| tree | 4b9419854e9ca579bc49330cc048e92337bea95f /lisp/mail/blessmail.el | |
| parent | a6115fe24c3c796c21216ee3a01a1b7f46b49df9 (diff) | |
| download | emacs-6875cf75e59086ca87d1d67c01fe2bf1da3cded1.tar.gz | |
Get the file's truename in case it is a link.
Diffstat (limited to 'lisp/mail/blessmail.el')
| -rw-r--r-- | lisp/mail/blessmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/blessmail.el b/lisp/mail/blessmail.el index 2dcb2071ad9..25c888c6ecf 100644 --- a/lisp/mail/blessmail.el +++ b/lisp/mail/blessmail.el @@ -36,7 +36,7 @@ (load "paths.el") (load "site-init" t) -(let ((attr (file-attributes rmail-spool-directory)) +(let ((attr (file-attributes (file-truename rmail-spool-directory))) modes) (or (eq t (car attr)) (signal 'error |