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

org-cycle-level: Do nothing at inlinetasks 

* lisp/org.el (org-cycle-level): Do not change task level at
inlinetasks.

Reported-by: Alain.Cochard@unistra.fr
Link: https://orgmode.org/list/25524.11082.597138.21839@gargle.gargle.HOWL
This commit is contained in:
Ihor Radchenko 2023-01-05 12:08:01 +03:00
parent 80d1bc63ff
commit a3815a169a
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org.el
View File

@ -6690,7 +6690,9 @@ This goes first to child, then to parent, level, then up the hierarchy.
After top level, it switches back to sibling level."
(interactive)
(let ((org-adapt-indentation nil))
(when (org-point-at-end-of-empty-headline)
(when (and (org-point-at-end-of-empty-headline)
(not (and (featurep 'org-inlinetask)
(org-inlinetask-in-task-p))))
(setq this-command 'org-cycle-level) ; Only needed for caching
(let ((cur-level (org-current-level))
(prev-level (org-get-previous-line-level)))