]> git.notmuchmail.org Git - notmuch/commitdiff
emacs: Use truenames for Fcc paths.
authorDavid Edmondson <dme@dme.org>
Fri, 12 Nov 2010 08:07:02 +0000 (08:07 +0000)
committerCarl Worth <cworth@cworth.org>
Tue, 7 Dec 2010 21:47:59 +0000 (13:47 -0800)
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.

emacs/notmuch-maildir-fcc.el

index e5e0549be8e10248cd4587b67919e19e724bbc38..3f1c124d4689d80fd8569953c3a005fd71921697 100644 (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")))