[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/dslide 6de2d70e6a 086/230: Clean up any pushed callbacks
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/dslide 6de2d70e6a 086/230: Clean up any pushed callbacks |
Date: |
Sun, 7 Jul 2024 19:00:19 -0400 (EDT) |
branch: elpa/dslide
commit 6de2d70e6a9ced7018917db20d836f0f12784b18
Author: Psionik K <73710933+psionic-k@users.noreply.github.com>
Commit: Psionik K <73710933+psionic-k@users.noreply.github.com>
Clean up any pushed callbacks
Signed-off-by: Psionik K <73710933+psionic-k@users.noreply.github.com>
---
macro-slides.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/macro-slides.el b/macro-slides.el
index 6c61ff09b5..03f7355edf 100644
--- a/macro-slides.el
+++ b/macro-slides.el
@@ -700,7 +700,6 @@ their init."
;; progress, we're done.
(cl-defmethod ms-step-forward ((obj ms-deck))
- ;; TODO Check for forward callbacks
(unless (oref obj slide)
;; Calls implied from other commands should have started the lifecycle
;; already
@@ -762,7 +761,6 @@ their init."
(ms--feedback :forward))
(when reached-end
- ;; TODO exhaust any remaining next slide callbacks
(run-hooks 'ms-after-last-slide-hook))))
(cl-defmethod ms-step-backward ((obj ms-deck))
@@ -2171,6 +2169,9 @@ and the value of `point-max' should contain a newline
somewhere."
(ms--delete-header)
(ms--delete-overlays)
(ms--animation-cleanup)
+ (mapc (lambda (f) (funcall f nil))
+ (oref ms--deck step-callbacks))
+ (oset ms--deck step-callbacks nil)
(remove-hook 'post-command-hook #'ms--contents-hl-line t))
(defun ms--ensure-deck ()
- [nongnu] elpa/dslide 659a5d1429 169/230: inline child action overhaul. much better, (continued)
- [nongnu] elpa/dslide 659a5d1429 169/230: inline child action overhaul. much better, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 90f9ff272d 175/230: correcting some mininformation, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 0f123e3638 177/230: Rename DSLIDE_SECTION_ACTIONS -> DSLIDE_ACTIONS, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide fd7acfa477 186/230: fix item reveal progress indication (broken a bit in recent rewrite), ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide afff88a6ca 202/230: Update following buffers even in different frames, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 57eca5d498 203/230: dslide-develop initialization was not quite complete, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 8a893d858b 215/230: Proper generic methods for eldoc completions, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 8f2a651695 212/230: cleanups-for-elpa, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 299a4de7da 220/230: replace video link with github asset, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 164392855b 227/230: Small fixups for the readme rendering, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 6de2d70e6a 086/230: Clean up any pushed callbacks,
ELPA Syncer <=
- [nongnu] elpa/dslide fb9c054977 069/230: Switch back to a non-development Org mode lol, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 1e94907060 126/230: custom action in demo, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide d365e64660 098/230: suppress animations in end method of inline child action, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 645e94a4fe 085/230: line noise, removing awkward newlines, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 2a5d14dec9 091/230: run narrow hook in other paths that will narrow, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 7f47a64acf 109/230: package-name macro-slide -> dslide, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide e9e4a75354 104/230: roll progress-tracking directly into the ms-action class, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 578f5082bb 105/230: whitespace, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 25c2429ac7 096/230: centralize following logic, normalize progress indications, ELPA Syncer, 2024/07/07
- [nongnu] elpa/dslide 6eb2cefbca 097/230: line noise, ELPA Syncer, 2024/07/07