summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2017-05-08 08:48:40 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2017-05-08 08:48:40 +0200
commit31cf5b2a9af1be370a3720b5c6fc3bd06428004d (patch)
tree5519f62f6e2a3b1eeb690f9b34392794006b5da5
parentc4b2ac861f617d8ee20a0a68b1f02e23bbc9f1f1 (diff)
downloadorg-mode-31cf5b2a9af1be370a3720b5c6fc3bd06428004d.tar.gz
ox-publish: Add missing `file-truename'
* lisp/ox-publish.el (org-publish--expand-file-name): Add missing `file-truename'.
-rw-r--r--lisp/ox-publish.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/ox-publish.el b/lisp/ox-publish.el
index 6847980..a41f825 100644
--- a/lisp/ox-publish.el
+++ b/lisp/ox-publish.el
@@ -407,9 +407,11 @@ definition."
(defun org-publish--expand-file-name (file project)
"Return full file name for FILE in PROJECT.
When FILE is a relative file name, it is expanded according to
-project base directory."
- (if (file-name-absolute-p file) file
- (expand-file-name file (org-publish-property :base-directory project))))
+project base directory. Always return the true name of the file,
+ignoring symlinks."
+ (file-truename
+ (if (file-name-absolute-p file) file
+ (expand-file-name file (org-publish-property :base-directory project)))))
(defun org-publish-expand-projects (projects-alist)
"Expand projects in PROJECTS-ALIST.