浏览代码

org-export: Fix template for derived back-ends

* contrib/lisp/org-export.el (org-export-as): Fix template for derived
  back-ends.
Nicolas Goaziou 13 年之前
父节点
当前提交
eb69035d5e
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      contrib/lisp/org-export.el

+ 2 - 1
contrib/lisp/org-export.el

@@ -2346,7 +2346,8 @@ Return code as a string."
 	;;    into a template, if required.  Eventually call
 	;;    final-output filter.
 	(let* ((body (org-element-normalize-string (org-export-data tree info)))
-	       (template (intern (format "org-%s-template" backend)))
+	       (template (cdr (assq 'template
+				    (plist-get info :translate-alist))))
 	       (output (org-export-filter-apply-functions
 			(plist-get info :filter-final-output)
 			(if (or (not (fboundp template)) body-only) body