|
@@ -710,6 +710,10 @@ modified) list.")
|
|
;; (setq p (plist-put p :title a)))
|
|
;; (setq p (plist-put p :title a)))
|
|
(when (setq a (org-entry-get pos "EXPORT_TEXT"))
|
|
(when (setq a (org-entry-get pos "EXPORT_TEXT"))
|
|
(setq p (plist-put p :text a)))
|
|
(setq p (plist-put p :text a)))
|
|
|
|
+ (when (setq a (org-entry-get pos "EXPORT_AUTHOR"))
|
|
|
|
+ (setq p (plist-put p :author a)))
|
|
|
|
+ (when (setq a (org-entry-get pos "EXPORT_DATE"))
|
|
|
|
+ (setq p (plist-put p :date a)))
|
|
(when (setq a (org-entry-get pos "EXPORT_OPTIONS"))
|
|
(when (setq a (org-entry-get pos "EXPORT_OPTIONS"))
|
|
(setq p (org-export-add-options-to-plist p a)))))
|
|
(setq p (org-export-add-options-to-plist p a)))))
|
|
p))
|
|
p))
|