|
@@ -381,7 +381,7 @@ If NO-EXCLUSION is non-nil, don't exclude files."
|
|
|
;; add all projects
|
|
;; add all projects
|
|
|
(mapc
|
|
(mapc
|
|
|
(lambda(p)
|
|
(lambda(p)
|
|
|
- (let* ((exclude (plist-get p :exclude))
|
|
|
|
|
|
|
+ (let* ((exclude (plist-get (cdr p) :exclude))
|
|
|
(files (org-publish-get-base-files p exclude)))
|
|
(files (org-publish-get-base-files p exclude)))
|
|
|
;; add all files from this project
|
|
;; add all files from this project
|
|
|
(mapc (lambda(f)
|
|
(mapc (lambda(f)
|