diff options
Diffstat (limited to 'email.org')
-rw-r--r-- | email.org | 9 |
1 files changed, 1 insertions, 8 deletions
@@ -335,14 +335,7 @@ (let ((dir (expand-file-name base "~/var/mail"))) (seq-difference (directory-files dir) (append '("." "..") excl)))) - (defun jao-mailbox-folders (&rest excl) - (seq-mapcat (lambda (base) - (mapcar `(lambda (d) (format "%s/%s" ,base d)) - (apply #'jao-list-mailboxes base excl))) - '("jao" "bigml" "feeds"))) - - (defvar jao-mailbox-folders (jao-mailbox-folders "trash" "spam")) - (defvar jao-mailbox-folders-rx (regexp-opt jao-mailbox-folders)) + #+end_src * consult narrowing #+begin_src emacs-lisp |