chvp/nixos-config
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Prefix all mu4e contexts with a unique key because there is no way to customize the shortcut, for some dumb reason

Browse source
This commit is contained in:
Charlotte Van Petegem 2021-03-20 22:55:56 +01:00
parent 27bb91229d
commit 5a68aeb291
No known key found for this signature in database
GPG key ID: 019E764B7184435A
1 changed files with 8 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

16
modules/emacs/init.el
View file

@ -179,7 +179,7 @@
(setq mu4e-contexts
(list
(make-mu4e-context
:name "Personal"
:name "pPersonal"
:match-func (lambda (msg) (when msg (string-prefix-p "/personal" (mu4e-message-field msg :maildir))))
:vars '(
(user-mail-address . "charlotte@vanpetegem.me")
@ -192,7 +192,7 @@
)
)
(make-mu4e-context
:name "Work"
:name "wWork"
:match-func (lambda (msg) (when msg (string-prefix-p "/work/" (mu4e-message-field msg :maildir))))
:vars '(
(user-mail-address . "charlotte.vanpetegem@ugent.be")
@ -205,7 +205,7 @@
)
)
(make-mu4e-context
:name "Work AAP-WE-FR"
:name "aWork AAP-WE-FR"
:match-func (lambda (msg) (when msg (string-prefix-p "/work-aap-we-fr" (mu4e-message-field msg :maildir))))
:vars '(
(user-mail-address . "aap-we-fr@ugent.be")
@ -218,10 +218,10 @@
)
)
(make-mu4e-context
:name "Posteo"
:name "oPosteo"
:match-func (lambda (msg) (when msg (string-prefix-p "/posteo" (mu4e-message-field msg :maildir))))
:vars '(
(user-mail-address . "charlotte@vanpetegem.me")
(user-mail-address . "chvp@posteo.net")
(user-full-name . "Charlotte Van Petegem")
(mu4e-drafts-folder . "/posteo/Drafts")
(mu4e-sent-folder . "/posteo/INBOX")
@ -234,7 +234,7 @@
:name "Jong Groen"
:match-func (lambda (msg) (when msg (string-prefix-p "/jonggroen" (mu4e-message-field msg :maildir))))
:vars '(
(user-mail-address . "charlotte@vanpetegem.me")
(user-mail-address . "charlotte@jonggroen.be")
(user-full-name . "Charlotte Van Petegem")
(mu4e-drafts-folder . "/jonggroen/[Gmail]/Drafts")
(mu4e-sent-folder . "/jonggroen/INBOX")
@ -244,7 +244,7 @@
)
)
(make-mu4e-context
:name "Postbot"
:name "bPostbot"
:match-func (lambda (msg) (when msg (string-prefix-p "/postbot" (mu4e-message-field msg :maildir))))
:vars '(
(user-mail-address . "postbot@vanpetegem.me")
@ -257,7 +257,7 @@
)
)
(make-mu4e-context
:name "Webmaster"
:name "mWebmaster"
:match-func (lambda (msg) (when msg (string-prefix-p "/webmaster" (mu4e-message-field msg :maildir))))
:vars '(
(user-mail-address . "webmaster@vanpetegem.me")