diff --git a/home/emacs/modules/custom-email-config.el b/home/emacs/modules/custom-email-config.el index 540be896..de81de32 100644 --- a/home/emacs/modules/custom-email-config.el +++ b/home/emacs/modules/custom-email-config.el @@ -36,7 +36,7 @@ (:subject)) mu4e-maildir-shortcuts '((:maildir "/Proton/Inbox/" :key ?p) (:maildir "/iCloud/Inbox/" :key ?i) - (:maildir "/Outlook/Inbox/" :key ?o))) + (:maildir "/Outlook/Inbox/" :key ?w))) (when (require 'mu4e nil :noerror) (keymap-set global-map "C-c m m" #'mu4e) @@ -49,6 +49,13 @@ (mu4e-alert-enable-mode-line-display)) (setq mu4e-contexts (list + (make-mu4e-context + :name "Xenia" + :vars '((user-mail-address . "evie@xenia.me.uk") + (mu4e-sent-folder . "/Proton/Sent") + (mu4e-drafts-folder . "/Proton/Drafts") + (mu4e-trash-folder . "/Proton/Trash") + (mu4e-refile-folder . "/Proton/Archive"))) (make-mu4e-context :name "Proton" :match-func (lambda (msg) (when msg (string-prefix-p "/Proton" (mu4e-message-field msg :maildir)))) @@ -66,7 +73,7 @@ (mu4e-trash-folder . "/iCloud/Deleted Messages") (mu4e-refile-folder . "/iCloud/Archive"))) (make-mu4e-context - :name "Outlook" + :name "Work" :match-func (lambda (msg) (when msg (string-prefix-p "/Outlook" (mu4e-message-field msg :maildir)))) :vars '((user-mail-address . "evie.litherland-smith@ukaea.uk") (mu4e-sent-folder . "/Outlook/Sent")