tweaks

1 files changed, 5 insertions, 0 deletions

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)