pixelifytica/nixos
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Add Xenia email context, change key/name for work email

Browse source
This commit is contained in:
Evie Litherland-Smith 2023-11-03 07:15:55 +00:00
parent f24a39ae75
commit 33f6eaff65
1 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
home/emacs/modules/custom-email-config.el
View file

@ -36,7 +36,7 @@
(:subject)) (:subject))
mu4e-maildir-shortcuts '((:maildir "/Proton/Inbox/" :key ?p) mu4e-maildir-shortcuts '((:maildir "/Proton/Inbox/" :key ?p)
(:maildir "/iCloud/Inbox/" :key ?i) (:maildir "/iCloud/Inbox/" :key ?i)
(:maildir "/Outlook/Inbox/" :key ?o))) (:maildir "/Outlook/Inbox/" :key ?w)))
(when (require 'mu4e nil :noerror) (when (require 'mu4e nil :noerror)
(keymap-set global-map "C-c m m" #'mu4e) (keymap-set global-map "C-c m m" #'mu4e)
@ -49,6 +49,13 @@
(mu4e-alert-enable-mode-line-display)) (mu4e-alert-enable-mode-line-display))
(setq mu4e-contexts (list (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 (make-mu4e-context
:name "Proton" :name "Proton"
:match-func (lambda (msg) (when msg (string-prefix-p "/Proton" (mu4e-message-field msg :maildir)))) :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-trash-folder . "/iCloud/Deleted Messages")
(mu4e-refile-folder . "/iCloud/Archive"))) (mu4e-refile-folder . "/iCloud/Archive")))
(make-mu4e-context (make-mu4e-context
:name "Outlook" :name "Work"
:match-func (lambda (msg) (when msg (string-prefix-p "/Outlook" (mu4e-message-field msg :maildir)))) :match-func (lambda (msg) (when msg (string-prefix-p "/Outlook" (mu4e-message-field msg :maildir))))
:vars '((user-mail-address . "evie.litherland-smith@ukaea.uk") :vars '((user-mail-address . "evie.litherland-smith@ukaea.uk")
(mu4e-sent-folder . "/Outlook/Sent") (mu4e-sent-folder . "/Outlook/Sent")