(use-package yaml-mode
:ensure t)
-
-(use-package wanderlust
- :ensure t)
-
(use-package mu4e
:config
(setq
:enter-func (lambda () (mu4e-message "Switch to Peronal context"))
:match-func (lambda (msg)
(when msg
- mu4e-message-contact-field-matches msg
- :to "max\+?.*@frie(dersdorff)?.com"))
+ (mu4e-message-contact-field-matches
+ msg (list :to :cc :bcc)
+ "max\\+?.*@frie\\(dersdorff\\)?.com")))
:vars '((user-mail-address . "max@friedersdorff.com")
(user-full-name . "Maximilian Friedersdorff")
(mu4e-sent-folder . "/personal/Sent")
:enter-func (lambda () (mu4e-message "Switch to Gmail context"))
:match-func (lambda (msg)
(when msg
- mu4e-message-contact-field-matches msg
- :to "maxf130\+?.*@gmail.com"))
+ (mu4e-message-contact-field-matches
+ msg (list :to :cc :bcc)
+ "maxf130\\+?.*@gmail.com")))
:vars '((user-mail-address . "maxf130@gmail.com")
(user-full-name . "Maximilian Friedersdorff")
(mu4e-sent-folder . "/personal-gmail/Sent")
:enter-func (lambda () (mu4e-message "Switch to Aber context"))
:match-func (lambda (msg)
(when msg
- mu4e-message-contact-field-matches msg
- :to "maf54\+?.*@aber.ac.uk"))
+ (mu4e-message-contact-field-matches
+ msg (list :to :cc :bcc)
+ "maf54\\+?.*@aber.ac.uk")))
:vars '((user-mail-address . "maf54@aber.ac.uk")
(user-full-name . "Maximilian Friedersdorff")
(mu4e-sent-folder . "/aber/Sent")