ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add missing part from commit b4604d2833 

* lisp/org.el (org-fill-context-prefix): Fix incorrect output when
  called at the beginning of a plain list with an affiliated keyword.
(org-fill-paragraph): Remove useless variable.
This commit is contained in:
Nicolas Goaziou 2012-08-25 15:41:01 +02:00
parent b4604d2833
commit 90f6324dbf
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/org.el
View File

@ -21043,9 +21043,7 @@ meant to be filled."
(comment (looking-at "[ \t]*# ?") (match-string 0))
(footnote-definition "")
((item plain-list)
(make-string (org-list-item-body-column
(org-element-property :begin element))
? ))
(make-string (org-list-item-body-column post-affiliated) ? ))
(paragraph
;; Fill prefix is usually the same as the current line,
;; except if the paragraph is at the beginning of an item.
@ -21119,8 +21117,7 @@ a footnote definition, try to fill the first paragraph within."
(let ((beg (max (point-min)
(org-element-property :contents-begin element)))
(end (min (point-max)
(org-element-property :contents-end element)))
(type (org-element-type element)))
(org-element-property :contents-end element))))
;; Do nothing if point is at an affiliated keyword.
(if (< (point) beg) t
(when (derived-mode-p 'message-mode)