浏览代码

Added a call to insert any bodynewline-paragraph value before the start of a line item.

Robert P. Goldman 15 年之前
父节点
当前提交
e50657d7cb
共有 1 个文件被更改,包括 5 次插入1 次删除
  1. 5 1
      contrib/lisp/org-export-generic.el

+ 5 - 1
contrib/lisp/org-export-generic.el

@@ -932,9 +932,13 @@ underlined headlines.  The default is 3."
             (string-match "^\\([ \t]+\\)\\(\\*[ \t]*\\)" line))
 	;;
 	;; plain list item
-	;;
 	;; TODO: nested lists
 	;;
+        ;; first add a line break between any previous paragraph or line item and this
+        ;; one
+        (when bodynewline-paragraph
+          (insert bodynewline-paragraph))
+
         ;; I believe this gets rid of leading whitespace.
 	(setq line (replace-match "" nil nil line))