From e7b7b9ef9d6fad2fcdd2a0d858b8f6835b66dc16 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sun, 11 Oct 2026 14:49:21 +0100
Subject: r2e: edit deleted history

---
 lib/net/jao-r2e.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'lib/net/jao-r2e.el')

diff --git a/lib/net/jao-r2e.el b/lib/net/jao-r2e.el
index 628e83f..76fed8f 100644
--- a/lib/net/jao-r2e.el
+++ b/lib/net/jao-r2e.el
@@ -171,6 +171,16 @@
         (jao-r2e-list)
         (goto-char p)))))
 
+;;;###autoload
+(defun jao-r2e-edit-deleted ()
+  (interactive)
+  (let ((kept nil))
+    (dolist (feed (jao-r2e--deleted))
+      (when (y-or-n-p (format "Keep %s? " feed))
+        (push feed kept)))
+    (setf (multisession-value jao-r2e-deleted-feeds) kept)
+    (message "%s feeds kept" (length kept))))
+
 (defun jao-r2e-recover ()
   (interactive)
   (when (seq-empty-p (jao-r2e--deleted))
-- 
cgit v1.2.3