瀏覽代碼

org-e-html-table: Emit `caption' elements only when required

Jambunathan K 12 年之前
父節點
當前提交
3a8969edbc
共有 1 個文件被更改,包括 2 次插入3 次删除
  1. 2 3
      contrib/lisp/org-e-html.el

+ 2 - 3
contrib/lisp/org-e-html.el

@@ -2835,10 +2835,9 @@ contextual information."
   				   (org-export-solidify-link-text label)))))))
        ;; Remove last blank line.
        (setq contents (substring contents 0 -1))
-       ;; FIXME: splice
-       (format "<table%s>\n<caption>%s</caption>\n%s\n%s\n</table>"
+       (format "<table%s>\n%s\n%s\n%s\n</table>"
   	       table-attributes
-  	       (or caption "")
+	       (if (not caption) "" (format "<caption>%s</caption>" caption))
   	       (funcall table-column-specs table info)
   	       contents)))))