tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Fix indentation after a list

Browse source 
* lisp/org.el (org-indent-line): Fix indentation after a list.
This commit is contained in:
Nicolas Goaziou 2013-07-25 18:57:59 +02:00
parent 1ea4c31eea
commit af300bd5b0
1 changed files with 3 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/org.el
View file

@ -21974,12 +21974,9 @@ hierarchy of headlines by UP levels before marking the subtree."
(beginning-of-line 0)) (beginning-of-line 0))
(cond (cond
;; There was a list item above. ;; There was a list item above.
((save-excursion ((ignore-errors (goto-char (org-in-item-p)))
(and (ignore-errors (goto-char (org-in-item-p))) (goto-char (org-list-get-top-point (org-list-struct)))
(goto-char (setq column (org-get-indentation)))
(org-list-get-top-point (org-list-struct)))))
(looking-at org-list-full-item-re)
(setq column (length (match-string 0))))
;; There was an heading above. ;; There was an heading above.
((looking-at "\\*+[ \t]+") ((looking-at "\\*+[ \t]+")
(if (not org-adapt-indentation) (if (not org-adapt-indentation)