From da5ab096b46b9fb42a01ed8810c5540d84345881 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Thu, 2 Dec 2021 09:33:46 +0100
Subject: Update mu4e config.

---
 init.org | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

(limited to 'init.org')

diff --git a/init.org b/init.org
index d858395..0492b1d 100644
--- a/init.org
+++ b/init.org
@@ -1085,6 +1085,7 @@ TODO: this is a big blob of email configuration.  Document this properly!
   (let ((guix     "(list:guix-devel.gnu.org OR list:bug-guix.gnu.org OR list:help-guix.gnu.org OR list:guix-sysadmin.gnu.org OR list:guix-security.gnu.org OR list:guix-patches.gnu.org OR list:guix-commits.gnu.org)")
         (guile    "(list:guile-user.gnu.org OR list:guile-devel.gnu.org OR list:bug-guile.gnu.org)")
         (emacs    "(list:emacs-devel.gnu.org)")
+        (waldow   "(list:waldow.googlegroups.com)")
         (fsfe     "(subject:\"Willkommen in der FSFE\" list:coordinators.lists.fsfe.org OR list:berlin.lists.fsfe.org OR list:newsletter-en@fsfeurope.org OR list:newsletter-de@fsfeurope.org)")
         (unread   "(flag:unread AND NOT flag:trashed)")
         (me       "(body:rekado OR body:Ricardo)"))
@@ -1106,14 +1107,17 @@ TODO: this is a big blob of email configuration.  Document this properly!
            (list (concat guile " " unread)
                  "Guile"  ?2)
            (list (concat fsfe " " unread)
-                 "FSFE"  ?4)
+                 "FSFE"  ?3)
+           (list waldow
+                 "Waldow"  ?4)
            (list (concat emacs " " unread)
-                 "Emacs"  ?7)
+                 "Emacs"  ?5)
            (list (concat "maildir:\"/private/mailinglists\""
                          " " unread
                          " NOT " guix
                          " NOT " guile
                          " NOT " fsfe
+                         " NOT " waldow
                          " NOT " emacs)
                  "Unread list messages"  ?m)
            (list (concat "maildir:\"/" maildir "/INBOX\" flag:flagged")
@@ -1161,6 +1165,11 @@ TODO: this is a big blob of email configuration.  Document this properly!
              '("git am" . mu4e-action-git-apply-mbox))
 (add-to-list 'mu4e-headers-actions
              '("git am" . mu4e-action-git-apply-mbox))
+
+;; Don't ask for a 'context' upon opening mu4e
+(setq mu4e-context-policy 'pick-first)
+;; Don't ask to quit
+(setq mu4e-confirm-quit nil)
 #+END_SRC
 
 I read and write email in different contexts.  This is my context for private email:
-- 
cgit v1.2.3