summary refs log tree commit diff stats
path: root/emacs
diff options
context:
space:
mode:
authorAlan Pearce2017-08-29 21:14:31 +0200
committerAlan Pearce2017-08-29 21:14:31 +0200
commit46a28c0496d4d8422056011556bde12e759ff6d1 (patch)
treece977a3099514addbdc84ad39258c4ecd6ae7f32 /emacs
parentf06e76405326ad7979ba5efe2408e89f802203b5 (diff)
downloaddotfiles-46a28c0496d4d8422056011556bde12e759ff6d1.tar.lz
dotfiles-46a28c0496d4d8422056011556bde12e759ff6d1.tar.zst
dotfiles-46a28c0496d4d8422056011556bde12e759ff6d1.zip
Add riseup to email system
Diffstat (limited to 'emacs')
-rw-r--r--emacs/.emacs.d/main.el18
1 files changed, 12 insertions, 6 deletions
diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el
index 17d38b1..e50fdad 100644
--- a/emacs/.emacs.d/main.el
+++ b/emacs/.emacs.d/main.el
@@ -1380,7 +1380,8 @@
         mu4e-view-show-images t
         mu4e-headers-date-format "%Y-%m-%d %H:%M"
 
-        mu4e-maildir (expand-file-name "~/mail/alanpearce")
+        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"
@@ -1390,7 +1391,6 @@
         sendmail-program "msmtp"
 
         mu4e-maildir-shortcuts '(("/INBOX" . ?i))
-        ;; mu4e-get-mail-command "offlineimap -o"
         mu4e-contexts
         (list
          (make-mu4e-context
@@ -1399,14 +1399,20 @@
                         (when msg
                           (mu4e-message-contact-field-matches
                            msg :to "alan@alanpearce\..*")))
-          :vars '((user-mail-address . "alan@alanpearce.eu")))
+          :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)))
          (make-mu4e-context
-          :name "Work"
+          :name "Riseup"
           :match-func (lambda (msg)
                         (when msg
                           (mu4e-message-contact-field-matches
-                           msg :to "alan.*@satoshipay.io")))
-          :vars '((user-mail-address . "alan@satoshipay.io"))))
+                           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-user-mail-address-list (append
                                      (delq nil
                                            (mapcar (lambda (context)