[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org a3815a169a: org-cycle-level: Do nothing at inlineta
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org a3815a169a: org-cycle-level: Do nothing at inlinetasks |
Date: |
Thu, 5 Jan 2023 04:58:00 -0500 (EST) |
branch: externals/org
commit a3815a169a6b50a786bfec7911b3485026119f4b
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
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
---
lisp/org.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/org.el b/lisp/org.el
index 377a8832f2..ae6250e522 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -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)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/org a3815a169a: org-cycle-level: Do nothing at inlinetasks,
ELPA Syncer <=