diff options
| author | jao <jao@gnu.org> | 2026-10-11 14:49:21 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2026-10-11 14:49:21 +0100 |
| commit | e7b7b9ef9d6fad2fcdd2a0d858b8f6835b66dc16 (patch) | |
| tree | e3aa346ced427486acf40781338498dc73057fbc /lib/net/jao-r2e.el | |
| parent | 01e77e135096197893522c205b30e6a6d07654c0 (diff) | |
| download | elibs-e7b7b9ef9d6fad2fcdd2a0d858b8f6835b66dc16.tar.gz elibs-e7b7b9ef9d6fad2fcdd2a0d858b8f6835b66dc16.tar.bz2 | |
r2e: edit deleted historymain
Diffstat (limited to 'lib/net/jao-r2e.el')
| -rw-r--r-- | lib/net/jao-r2e.el | 10 |
1 files changed, 10 insertions, 0 deletions
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)) |