From 9e8f967ba282f9e582807ce3de7fc63ab38fee33 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Wed, 12 Jan 2022 23:48:35 +0000
Subject: fix for jao-rss-subscribe

---
 init.org | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/init.org b/init.org
index 8e752db..d6992ab 100644
--- a/init.org
+++ b/init.org
@@ -1617,8 +1617,7 @@
         (let* ((url+title (if (consp url) url (list url)))
                (url (car url+title))
                (title (cdr url+title))
-               (cats (mapcar (lambda (f) (car (last (split-string f "\\."))))
-                             (directory-files nnml-directory nil "feeds"))))
+               (cats (jao-notmuch--feed-tags "feeds")))
           (if url
               (let ((url (if (string-match "^feed:" url) (substring url 5) url)))
                 (when (y-or-n-p (format "Subscribe to <%s>? " url))
-- 
cgit v1.2.3