From 7da0d6b99499fce56ccc2b1e13176092e2e136bb Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Fri, 18 May 2012 09:17:58 +0200 Subject: [PATCH] org-publish.el: #+INCLUDE now use mandatory quotes, spaces are allowed in file names. * org-publish.el (org-publish-cache-file-needs-publishing): Make quotes mandatory around the file name and allow spaces in it. Thanks to Albert for this suggestion. --- lisp/org-publish.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-publish.el b/lisp/org-publish.el index 55ba12c74..cfd81f0fe 100644 --- a/lisp/org-publish.el +++ b/lisp/org-publish.el @@ -1122,7 +1122,7 @@ so that the file including them will be republished as well." (setq buf (find-file (expand-file-name filename))) (with-current-buffer buf (goto-char (point-min)) - (while (re-search-forward "^#\\+include:[ \t]+\"?\\([^ \t\n\r\"]*\\)\"?[ \t]*.*$" nil t) + (while (re-search-forward "^#\\+include:[ \t]+\"\\([^\t\n\r\"]*\\)\"[ \t]*.*$" nil t) (let* ((included-file (expand-file-name (match-string 1)))) (add-to-list 'included-files-ctime (org-publish-cache-ctime-of-src included-file) t))))