summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2017-09-29 11:06:13 +0200
committerAlan Pearce2017-09-29 11:06:13 +0200
commit13cde4dbbb5df743899f45a84d5fc0f59b615efc (patch)
tree6d77ed1d45ccd982084145c2019ff7f03bf9e379
parent6080b92b6aea07a7e7447bfc8630e4e6bb6116cc (diff)
downloaddotfiles-13cde4dbbb5df743899f45a84d5fc0f59b615efc.tar.lz
dotfiles-13cde4dbbb5df743899f45a84d5fc0f59b615efc.tar.zst
dotfiles-13cde4dbbb5df743899f45a84d5fc0f59b615efc.zip
Emacs: Use mu4e contexts correctly
-rw-r--r--emacs/.emacs.d/main.el44
1 files changed, 16 insertions, 28 deletions
diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el
index af408e2..177eefb 100644
--- a/emacs/.emacs.d/main.el
+++ b/emacs/.emacs.d/main.el
@@ -1228,12 +1228,8 @@ With two prefix arguments, write out the day and month name."
                     mu4e-index-cleanup nil
                     mu4e-index-lazy-check t
 
-                    mu4e-mu-home (expand-file-name "~/.cache/mu/alanpearce.eu")
-                    mu4e-maildir (expand-file-name "~/mail/personal/alanpearce/")
-                    mu4e-sent-folder "/Sent"
-                    mu4e-drafts-folder "/Drafts"
-                    mu4e-refile-folder "/Archive"
-                    mu4e-trash-folder "/Trash"
+                    mu4e-maildir (expand-file-name "~/mail")
+                    mu4e-mu-home (expand-file-name "~/.cache/mu")
 
                     mu4e-change-filenames-when-moving t
 
@@ -1242,7 +1238,8 @@ With two prefix arguments, write out the day and month name."
                     message-send-mail-function #'message-send-mail-with-sendmail
                     sendmail-program "msmtp"
 
-                    mu4e-maildir-shortcuts '(("/INBOX" . ?i))
+                    mu4e-get-mail-command "mbsync -a"
+
                     mu4e-contexts
                     (list
                      (make-mu4e-context
@@ -1252,14 +1249,11 @@ With two prefix arguments, write out the day and month name."
                                       (mu4e-message-contact-field-matches
                                        msg :to "alan@alanpearce\..*")))
                       :vars `((user-mail-address . "alan@alanpearce.eu")
-                              (mu4e-maildir . ,(expand-file-name "~/mail/personal/alanpearce"))
-                              (mu4e-mu-home . ,(expand-file-name "~/.cache/mu/alanpearce.eu"))
                               (mu4e-sent-messages-behavior . sent)
-                              (mu4e-get-mail-command . "mbsync personal")
-                              (mu4e-sent-folder . "/Sent")
-                              (mu4e-drafts-folder . "/Drafts")
-                              (mu4e-refile-folder . "/Archive")
-                              (mu4e-trash-folder . "/Trash")))
+                              (mu4e-sent-folder . "/personal/alanpearce/Sent")
+                              (mu4e-drafts-folder . "/personal/alanpearce/Drafts")
+                              (mu4e-refile-folder . "/personal/alanpearce/Archive")
+                              (mu4e-trash-folder . "/personal/alanpearce/Trash")
                      (make-mu4e-context
                       :name "Riseup"
                       :match-func (lambda (msg)
@@ -1267,14 +1261,11 @@ With two prefix arguments, write out the day and month name."
                                       (mu4e-message-contact-field-matches
                                        msg :to "alanpearce@riseup.net")))
                       :vars `((user-mail-address . "alanpearce@riseup.net")
-                              (mu4e-maildir . ,(expand-file-name "~/mail/personal/riseup"))
-                              (mu4e-mu-home . ,(expand-file-name "~/.cache/mu/riseup.net"))
                               (mu4e-sent-messages-behavior . sent)
-                              (mu4e-get-mail-command . "mbsync riseup")
-                              (mu4e-sent-folder . "/Sent")
-                              (mu4e-drafts-folder . "/Drafts")
-                              (mu4e-refile-folder . "/Archive")
-                              (mu4e-trash-folder . "/Trash")))
+                              (mu4e-sent-folder . "/riseup/Sent")
+                              (mu4e-drafts-folder . "/riseup/Drafts")
+                              (mu4e-refile-folder . "/riseup/Archive")
+                              (mu4e-trash-folder . "/riseup/Trash")
                      (make-mu4e-context
                       :name "Satoshipay"
                       :match-func (lambda (msg)
@@ -1282,14 +1273,11 @@ With two prefix arguments, write out the day and month name."
                                       (mu4e-message-contact-field-matches
                                        msg :to "alan@satoshipay.io")))
                       :vars `((user-mail-address . "alan@satoshipay.io")
-                              (mu4e-maildir . ,(expand-file-name "~/mail/satoshipay"))
-                              (mu4e-mu-home . ,(expand-file-name "~/.cache/mu/satoshipay.io"))
                               (mu4e-sent-messages-behavior . sent)
-                              (mu4e-get-mail-command . "mbsync satoshipay")
-                              (mu4e-drafts-folder . "/[Gmail]/.Drafts")
-                              (mu4e-sent-folder .   "/[Gmail]/.Sent Mail")
-                              (mu4e-refile-folder . "/[Gmail]/.All Mail")
-                              (mu4e-trash-folder .  "/[Gmail]/.Bin"))))
+                              (mu4e-drafts-folder . "/satoshipay/[Gmail]/.Drafts")
+                              (mu4e-sent-folder .   "/satoshipay/[Gmail]/.Sent Mail")
+                              (mu4e-refile-folder . "/satoshipay/[Gmail]/.All Mail")
+                              (mu4e-trash-folder .  "/satoshipay/[Gmail]/.Bin")
                     mu4e-user-mail-address-list (append
                                                  (delq nil
                                                        (mapcar (lambda (context)