diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2010-08-16 17:27:25 +0200 |
|---|---|---|
| committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-08-16 17:27:25 +0200 |
| commit | 3529be82eff7906c1182fafbea6012fb6bfec160 (patch) | |
| tree | e3ef88eb8bf4229e5c9a1cf5de070b79fe058f16 | |
| parent | ea16ef95358f4e8788661f6037df213c9f7ae577 (diff) | |
| download | org-mode-3529be82eff7906c1182fafbea6012fb6bfec160.tar.gz | |
Fix interpretation of the :include property as a list of file names
| -rw-r--r-- | lisp/org-publish.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/org-publish.el b/lisp/org-publish.el index 6324eba..4bf2031 100644 --- a/lisp/org-publish.el +++ b/lisp/org-publish.el @@ -471,7 +471,12 @@ matching filenames." (i (plist-get (cdr prj) :include)) (xm (concat "^" b (if r ".+" "[^/]+") "\\.\\(" x "\\)$"))) (when (or - (and i (string-match i filename)) + (and + i + (member filename + (mapcar + (lambda (file) (expand-file-name file b)) + i))) (and (not (and e (string-match e filename))) (string-match xm filename))) |