github/dotfiles
1
0
Fork 0
mirror of https://github.com/correl/dotfiles.git synced 2024-11-22 03:00:05 +00:00
Code Issues Projects Releases Packages Wiki Activity

[emacs] Guard email config with conditionals

Browse source
This commit is contained in:
Correl Roush 2023-09-28 10:27:21 -04:00
parent 1fb532801a
commit 5937c5b1c4
1 changed files with 26 additions and 20 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
.doom.d/config.org
View file

@ -1147,8 +1147,12 @@ Configure MU4E to read email synced from my personal and work accounts.
(setq mu4e-maildir "~/Mail") (setq mu4e-maildir "~/Mail")
(setq user-full-name "Correl Roush") (setq user-full-name "Correl Roush")
(setq mu4e-contexts (setq mu4e-contexts nil)
(list (make-mu4e-context (when (f-exists?
(f-join mu4e-maildir "Work"))
(add-to-list
'mu4e-contexts
(make-mu4e-context
:name "work" :name "work"
:vars `((user-mail-address . "correlr@aweber.com") :vars `((user-mail-address . "correlr@aweber.com")
(mu4e-drafts-folder . "/Work/[Gmail]/Drafts") (mu4e-drafts-folder . "/Work/[Gmail]/Drafts")
@ -1160,7 +1164,8 @@ Configure MU4E to read email synced from my personal and work accounts.
("/Work/[Gmail]/Sent Mail" . ?s) ("/Work/[Gmail]/Sent Mail" . ?s)
("/Work/[Gmail]/Trash" . ?t))) ("/Work/[Gmail]/Trash" . ?t)))
(mu4e-compose-signature . ,(with-temp-buffer (mu4e-compose-signature . ,(with-temp-buffer
(insert-file-contents "~/.signature-aweber") (when (f-exists? "~/.signature-aweber")
(insert-file-contents "~/.signature-aweber"))
(buffer-string))) (buffer-string)))
(smtpmail-smtp-user . "correlr@aweber.com") (smtpmail-smtp-user . "correlr@aweber.com")
(smtpmail-smtp-server . "smtp.gmail.com") (smtpmail-smtp-server . "smtp.gmail.com")
@ -1182,7 +1187,8 @@ Configure MU4E to read email synced from my personal and work accounts.
("/Personal/[Gmail]/Sent Mail" . ?s) ("/Personal/[Gmail]/Sent Mail" . ?s)
("/Personal/[Gmail]/Trash" . ?t))) ("/Personal/[Gmail]/Trash" . ?t)))
(mu4e-compose-signature . ,(with-temp-buffer (mu4e-compose-signature . ,(with-temp-buffer
(insert-file-contents "~/.signature") (when (f-exists? "~/.signature")
(insert-file-contents "~/.signature"))
(buffer-string))) (buffer-string)))
(smtpmail-smtp-user . "correl@gmail.com") (smtpmail-smtp-user . "correl@gmail.com")
(smtpmail-smtp-server . "smtp.gmail.com") (smtpmail-smtp-server . "smtp.gmail.com")