From 8d31b7883a19b513dca76572c97f710f27bd1e74 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sun, 16 Jun 2024 20:29:48 +0300 Subject: Add gnosis-review-action--suspend --- gnosis.el | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'gnosis.el') diff --git a/gnosis.el b/gnosis.el index 0c16c25..00af476 100644 --- a/gnosis.el +++ b/gnosis.el @@ -1348,6 +1348,15 @@ the review session." (gnosis-review-commit note-count) ;; Break the loop of `gnosis-review-session' (throw 'stop-loop t)) + +(defun gnosis-review-action--suspend (success note note-count) + "Suspend/Unsuspend NOTE. + +This function should be used with `gnosis-review-actions', which +should be recursively called using SUCCESS, NOTE, NOTE-COUNT." + (gnosis-suspend-note note) + (gnosis-review-actions success note note-count)) + (defun gnosis-review-actions (success note note-count) "Specify action during review of note. -- cgit v1.2.3