Kaynağa Gözat

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 14 yıl önce
ebeveyn
işleme
4f85aa21c6
1 değiştirilmiş dosya ile 2 ekleme ve 1 silme
  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))))))))