Fix cycling indentation with inline tasks
* org.el (org-current-level): ignore inline tasks when getting current level of entry
This commit is contained in:
parent
5bbce0473d
commit
aa9fbbb323
11
lisp/org.el
11
lisp/org.el
|
@ -7020,11 +7020,12 @@ in the region."
|
|||
"Return the level of the current entry, or nil if before the first headline.
|
||||
The level is the number of stars at the beginning of the headline."
|
||||
(save-excursion
|
||||
(condition-case nil
|
||||
(progn
|
||||
(org-back-to-heading t)
|
||||
(funcall outline-level))
|
||||
(error nil))))
|
||||
(let ((outline-regexp (org-get-limited-outline-regexp)))
|
||||
(condition-case nil
|
||||
(progn
|
||||
(org-back-to-heading t)
|
||||
(funcall outline-level))
|
||||
(error nil)))))
|
||||
|
||||
(defun org-get-previous-line-level ()
|
||||
"Return the outline depth of the last headline before the current line.
|
||||
|
|
Loading…
Reference in New Issue