tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

ox-publish: Handle includes with searches 

* lisp/ox-publish.el (org-publish-cache-file-needs-publishing): Ignore
  any link search suffix on an include so that the path represents
  a valid file during the publishing check.

TINYCHANGE
This commit is contained in:
Nick Gunn 2015-11-23 10:50:03 +01:00 committed by Nicolas Goaziou
parent d537a371be
commit 773e0e9c72
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/ox-publish.el
View File

@ -1229,7 +1229,7 @@ If FREE-CACHE, empty the cache."
(setq org-publish-cache nil))
(defun org-publish-cache-file-needs-publishing
(filename &optional pub-dir pub-func base-dir)
(filename &optional pub-dir pub-func base-dir)
"Check the timestamp of the last publishing of FILENAME.
Return non-nil if the file needs publishing. Also check if
any included files have been more recently published, so that
@ -1254,8 +1254,10 @@ the file including them will be republished as well."
(let ((value (org-element-property :value element)))
(and value
(string-match "^\\(\".+?\"\\|\\S-+\\)" value)
(org-remove-double-quotes
(match-string 1 value)))))))
;; Ignore search suffix.
(car (split-string
(org-remove-double-quotes
(match-string 1 value)))))))))
(when included-file
(add-to-list 'included-files-ctime
(org-publish-cache-ctime-of-src