From bf94f1b767b586580fd664f8406184e0af9ccc86 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Fri, 30 Apr 2021 23:01:50 +0100
Subject: tweaks

---
 init.org | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'init.org')

diff --git a/init.org b/init.org
index 3d2d9ce..8591585 100644
--- a/init.org
+++ b/init.org
@@ -1686,6 +1686,11 @@
                 (if (fboundp 'w3m-view-mode) (w3m-view-source) (View-quit))
                 (when url (cons url (or title ""))))))))
 
+      (defun jao-list-mailboxes (base)
+        (let ((dir (expand-file-name base "~/var/mail")))
+          (seq-difference (directory-files dir)
+                          '("." ".." "sent" "inbox" "trash"))))
+
       (defun jao-rss-subscribe ()
         (interactive)
         (let* ((url (or (jao-url-around-point)
-- 
cgit v1.2.3