emacs: Use truenames for Fcc paths.

Appease the test suite by using the true name for the Fcc directory
path, otherwise a value for `notmuch-database-path' which includes
symbolic links causes test suite failures.
This commit is contained in:
David Edmondson 2010-11-12 08:07:02 +00:00 committed by Carl Worth
parent 2ff4c4bb2a
commit cafd46ca13

View file

@ -110,11 +110,12 @@ will NOT be removed or replaced."
(when subdir
(message-add-header
(concat "Fcc: "
;; If the resulting directory is not an absolute path,
;; prepend the standard notmuch database path.
(if (= (elt subdir 0) ?/)
subdir
(concat (notmuch-database-path) "/" subdir))))
(file-truename
;; If the resulting directory is not an absolute path,
;; prepend the standard notmuch database path.
(if (= (elt subdir 0) ?/)
subdir
(concat (notmuch-database-path) "/" subdir)))))
;; finally test if fcc points to a valid maildir
(let ((fcc-header (message-fetch-field "Fcc")))