Browse Source

org-list: fix a small error when guessing blank lines before items

* lisp/org-list.el: search blank lines down to the end of the item
  instead of stopping at the item, in order to possibly match such
  lines within the item.
Nicolas Goaziou 6 years ago
parent
commit
4f85aa21c6
1 changed files with 2 additions and 1 deletions
  1. 2 1
      lisp/org-list.el

+ 2 - 1
lisp/org-list.el

@@ -1197,7 +1197,8 @@ some heuristics to guess the result."
 	     ;; Are there blank lines inside the list so far?
 	     ((save-excursion
 		(goto-char (org-list-get-top-point struct))
-		(org-list-search-forward "^[ \t]*$" item t))
+		(org-list-search-forward
+		 "^[ \t]*$" (org-list-get-item-end-before-blank item struct) t))
 	      1)
 	     ;; Default choice: no blank line.
 	     (t 0))))))))