Add commands for (un)suspending all cards in a region

1 files changed, 12 insertions, 0 deletions

diff --git a/org-fc.el b/org-fc.el
index 3c4a376..1b25b21 100644
--- a/org-fc.el
+++ b/org-fc.el
@@ -764,6 +764,12 @@ Other useful values are:
   (org-fc-map-cards 'org-fc-suspend-card))
 
 ;;;###autoload
+(defun org-fc-suspend-region ()
+  "Suspend all cards in the current region."
+  (interactive)
+  (org-fc-map-cards 'org-fc-suspend-card 'region))
+
+;;;###autoload
 (defun org-fc-unsuspend-card ()
   "Unsuspend the headline at point.
 Checks if the headline is a suspended card first."
@@ -782,6 +788,12 @@ Checks if the headline is a suspended card first."
   (interactive)
   (org-fc-map-cards 'org-fc-unsuspend-card))
 
+;;;###autoload
+(defun org-fc-unsuspend-region ()
+  "Un-suspend all cards in the current region."
+  (interactive)
+  (org-fc-map-cards 'org-fc-unsuspend-card 'region))
+
 ;;; Indexing Cards
 ;;;; Card Filters