gergely/my-emacs-d
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix the mu4e configuration

Browse Source
This commit is contained in:
Gergely Polonkai 2020-06-16 06:39:46 +02:00
parent 015b2fa5cd
commit b696242194
No known key found for this signature in database
GPG Key ID: 2D2885533B869ED4
1 changed files with 43 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

70
configuration.org
View File

@ -2345,36 +2345,52 @@ accompanying function will be added to ~mu4e-view-mode-hook~.
(require 'org-mu4e) (require 'org-mu4e)
(setq mu4e-contexts (setq mu4e-contexts
`( ,(make-mu4e-context `( ,(make-mu4e-context
:name "polonkai.eu"
:enter-func (lambda () (mu4e-message "Entering polonkai.eu Context"))
:leave-func (lambda () (mu4e-message "Leaving polonkai.eu Context"))
:match-func (lambda (msg)
(when msg
(mu4e-message-contact-field-matches
msg
:to "gergely@polonkai.eu")))
:vars '((user-mail-address . "gergely@polonkai.eu")
(mu4e-sent-folder . "/Polonkai/[Gmail].Sendur p&APM-stur")
(mu4e-drafts-folder . "/Polonkai/[Gmail].Dr&APY-g")
(mu4e-trash-folder . "/Polonkai/[Gmail].Rusl")
(mu4e-refile-folder . "/Polonkai/[Gmail].Dr&APY-g")))
,(make-mu4e-context
:name "Benchmark.games"
:enter-func (lambda () (mu4e-message "Entering Benchmark.games Context"))
:leave-func (lambda () (mu4e-message "Leaving Benchmark.games Context"))
:match-func (lambda (msg)
(when msg
(or
(mu4e-message-contact-field-matches
msg
:to "gergo@gt2.io")
(mu4e-message-contact-field-matches
msg
:to "gergo@benchmarked.games")
(mu4e-message-contact-field-matches
msg
:to "gergo@benchmark.games"))))
:vars '((user-mail-address . "gergo@benchmark.games")
(mu4e-sent-folder . "/GT2/[Gmail].Sent Mail")
(mu4e-drafts-folder . "/GT2/[Gmail].Drafts")
(mu4e-trash-folder . "/GT2/[Gmail].Trash")
(mu4e-refile-folder . "/GT2/[Gmail].Drafts")))
,(make-mu4e-context
:name "Private" :name "Private"
:enter-func (lambda () (mu4e-message "Entering Private Context")) :enter-func (lambda () (mu4e-message "Entering Private Context"))
:leave-func (lambda () (mu4e-message "Leaving Private Context")) :leave-func (lambda () (mu4e-message "Leaving Private Context"))
:match-func (lambda (msg) :match-func (lambda (msg)
(when msg (when msg
(mu4e-message-contact-field-matches msg (string-match-p "^/Private" (mu4e-message-field msg :maildir))))
:to "gergely@polonkai.eu"))) :vars '((user-mail-address . "me@gergely.polonkai.eu")
:vars '((user-mail-address . "gergely@polonkai.eu") (mu4e-sent-folder . "/Private/Sent")
(mu4e-maildir . "~/.cache/mail/Polonkai") (mu4e-drafts-folder . "/Private/Drafts")
(mu4e-sent-folder . "/[Gmail].Sendur p&APM-stur") (mu4e-trash-folder . "/Private/Trash")
(mu4e-drafts-folder . "/[Gmail].Dr&APY-g") (mu4e-refile-folder . "/Private/Drafts"))))
(mu4e-trash-folder . "/[Gmail].Rusl")
(mu4e-refile-folder . "/[Gmail].Dr&APY-g")))
,(make-mu4e-context
:name "GT2"
:enter-func (lambda () (mu4e-message "Entering GT2 Context"))
:leave-func (lambda () (mu4e-message "Leaving GT2 Context"))
:match-func (lambda (msg)
(when msg
(or
(mu4e-message-contact-field-matches msg
:to "gergo@gt2.io")
(mu4e-message-contact-field-matches msg
:to "gergo@benchmarked.games"))))
:vars '((user-mail-address . "gergo@benchmarked.games")
(mu4e-maildir . "~/.cache/mail/GT2")
(mu4e-sent-folder . "/[Gmail].Sent Mail")
(mu4e-drafts-folder . "/[Gmail].Drafts")
(mu4e-trash-folder . "/[Gmail].Trash")
(mu4e-refile-folder . "/[Gmail].Drafts"))))
org-mu4e-link-query-in-headers-mode nil) org-mu4e-link-query-in-headers-mode nil)
:custom :custom
(mu4e-completing-read-function 'helm-comp-read) (mu4e-completing-read-function 'helm-comp-read)
@ -3703,7 +3719,7 @@ With the new Transient package it will be easier. I just don’t know how to us
[("c" "Compose mail" mu4e-compose-new) [("c" "Compose mail" mu4e-compose-new)
("i" "Jump to folder" mu4e~headers-jump-to-maildir) ("i" "Jump to folder" mu4e~headers-jump-to-maildir)
("m" "Mu4e main screen" mu4e) ("m" "Mu4e main screen" mu4e)
("s" "Mu4u search" mu4e-headers-search)]) ("s" "Mu4e search" mu4e-headers-search)])
(define-transient-command gpolonkai/sx-menu () (define-transient-command gpolonkai/sx-menu ()
[("i" "Inbox" sx-inbox) [("i" "Inbox" sx-inbox)