From 89259b3107e314ee13687822caeaee358e6dc77b Mon Sep 17 00:00:00 2001 From: larstvei Date: Sat, 28 Feb 2026 15:19:05 +0100 Subject: [PATCH] Make mu4e ignore noisy email --- init.org | 18 ++++++++++++++---- 1 file changed, 14 insertions(+), 4 deletions(-) diff --git a/init.org b/init.org index 530cd7a..e8f83ab 100644 --- a/init.org +++ b/init.org @@ -1209,9 +1209,7 @@ (use-package mu4e :ensure nil :if (and (file-exists-p "~/Maildir") - (executable-find "mbsync") - (executable-find "msmtp") - (executable-find "mu")) + (seq-every-p 'executable-find '("mbsync" "msmtp" "mu"))) :bind (:map custom-bindings-map ("C-x m" . mu4e)) :config @@ -1221,7 +1219,6 @@ (setq mu4e-change-filenames-when-moving t) (setq mu4e-get-mail-command (concat (executable-find "mbsync") " -a")) - (setq mu4e-maildir "~/Maildir") (setq mu4e-use-fancy-chars t) (setq mu4e-drafts-folder "/uio/Drafts") (setq mu4e-sent-folder "/uio/Sent Items") @@ -1231,6 +1228,19 @@ '(("/uio/Inbox" . ?i) ("/uio/Sent Items" . ?s))) + (let* ((inspera-noise " AND NOT maildir:\"/uio/Inspera varsling\"") + (devilry-noise " AND NOT maildir:/uio/Devilry") + (general-noise " AND NOT maildir:\"/uio/Junk Email\"") + (noise-filter (concat inspera-noise devilry-noise general-noise))) + + (setq mu4e-bookmarks + `(( :name "Unread messages" :key ?u + :query ,(concat "flag:unread" noise-filter)) + ( :name "Today's messages" :key ?t + :query ,(concat "date:today..now" noise-filter) ) + ( :name "Last 7 days" :key ?w + :query ,(concat "date:7d..now" noise-filter))))) + (setq sendmail-program (executable-find "msmtp")) (setq send-mail-function 'smtpmail-send-it) (setq message-sendmail-f-is-evil t)