diff --git a/lisp/org-publish.el b/lisp/org-publish.el index bb20cc60d..f29b402af 100644 --- a/lisp/org-publish.el +++ b/lisp/org-publish.el @@ -1068,7 +1068,9 @@ Returns value on success, else nil." (defun org-publish-cache-ctime-of-src (filename) "Get the files ctime as integer." - (let ((src-attr (file-attributes filename))) + (let ((src-attr (file-attributes (if (stringp (file-symlink-p filename)) + (file-symlink-p filename) + filename)))) (+ (lsh (car (nth 5 src-attr)) 16) (cadr (nth 5 src-attr)))))