branch: elpa/dslide
commit ca778812bf308d1f33bcbb09fc8e30c71ca1f0e9
Author: Psionik K <73710933+psioni...@users.noreply.github.com>
Commit: Psionik K <73710933+psioni...@users.noreply.github.com>
Start at beginning of heading to implement end
The children are obtained by repeatedly calling `ms-forward-child', so it's
necessary to start at the beginning. Each child is sent to its finished
state
by calling `ms-end'. It might also work if they were hydrated in reverse,
but
this simulates the play-from-beginning style of reaching the end.
Signed-off-by: Psionik K <73710933+psioni...@users.noreply.github.com>
---
macro-slides.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/macro-slides.el b/macro-slides.el
index 668b1e53e2..397264d057 100644
--- a/macro-slides.el
+++ b/macro-slides.el
@@ -1716,6 +1716,7 @@ child is found."
(not (null progress))))
(cl-defmethod ms-end :after ((obj ms-child-action-inline))
+ (ms-marker obj (org-element-property :begin (ms-heading obj)))
(let (exhausted)
(while (not exhausted)
;; If the child didn't make progress, try to load up the next child
