浏览代码

org-export: Do not export subtree titles as-is

* contrib/lisp/org-export.el (org-export-get-subtree-options):
  Interpret subtree title as a secondary string, not as a simple string.
Nicolas Goaziou 13 年之前
父节点
当前提交
d41b9803e2
共有 1 个文件被更改,包括 6 次插入1 次删除
  1. 6 1
      contrib/lisp/org-export.el

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

@@ -945,7 +945,12 @@ Return options as a plist."
 			    (or (save-match-data
 				  (org-entry-get (point) "EXPORT_TITLE"))
 				(org-match-string-no-properties 3))))
-      (setq plist (plist-put plist :title prop)))
+      (setq plist
+	    (plist-put
+	     plist :title
+	     (org-element-parse-secondary-string
+	      prop
+	      (cdr (assq 'keyword org-element-string-restrictions))))))
     (when (setq prop (org-entry-get (point) "EXPORT_TEXT"))
       (setq plist (plist-put plist :text prop)))
     (when (setq prop (org-entry-get (point) "EXPORT_AUTHOR"))