ndwarshuis
/
emacs-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added gatech and emory accounts to mu4e and update auth

This commit is contained in:
petrucci4prez 2018-09-01 21:02:22 -04:00
parent cc336431e9
commit c6b76bded2
1 changed files with 50 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

78
conf.org
View File

@ -1755,6 +1755,10 @@ Work in progress, only for receiving Gmail and work exhange mailboxes
** basic ** basic
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(require 'mu4e) (require 'mu4e)
(require 'smtpmail)
(add-to-list 'auth-sources (expand-file-name "~/.emacs.d/.authinfo_mu4e.gpg"))
(setq mail-user-agent 'mu4e-user-agent (setq mail-user-agent 'mu4e-user-agent
mu4e-maildir "/mnt/data/Mail" mu4e-maildir "/mnt/data/Mail"
@ -1768,46 +1772,64 @@ Work in progress, only for receiving Gmail and work exhange mailboxes
mu4e-change-filenames-when-moving t mu4e-change-filenames-when-moving t
mu4e-confirm-quit nil mu4e-confirm-quit nil
send-mail-function 'smtpmail-send-it
message-send-mail-function 'smtpmail-send-it
mu4e-contexts user-full-name "Nate Dwarshuis")
#+END_SRC
** contexts
I have current have three contexts, personal and two work accounts. The first is a gmail account and the second/third are office365 accounts.
#+BEGIN_SRC emacs-lisp
(setq mu4e-contexts
`( ,(make-mu4e-context `( ,(make-mu4e-context
:name "Gmail" :name "personal"
:match-func :match-func
(lambda (msg) (lambda (msg)
(when msg (when msg
(let ((pfx (mu4e-message-field msg :maildir))) (let ((pfx (mu4e-message-field msg :maildir)))
(string-prefix-p "/gmail" pfx)))) (string-prefix-p "/gmail" pfx))))
:vars '((mu4e-trash-folder . "/gmail/trash") :vars '((mu4e-trash-folder . "/gmail/trash")
(mu4e-drafts-folder . "/gmail/drafts") (mu4e-drafts-folder . "/gmail/drafts")
(mu4e-sent-folder . "/gmail/sent"))) (mu4e-sent-folder . "/gmail/sent")
(mu4e-sent-messages-behavior . delete)
(smtpmail-stream-type . starttls)
(smtpmail-smtp-server . "smtp.gmail.com")
(smtpmail-smtp-service . 587)
(smtpmail-smtp-user . "natedwarshuis@gmail.com")
(user-mail-address . "natedwarshuis@gmail.com")))
,(make-mu4e-context ,(make-mu4e-context
:name "Work" :name "gatech"
:match-func :match-func
(lambda (msg) (lambda (msg)
(when msg (when msg
(let ((pfx (mu4e-message-field msg :maildir))) (let ((pfx (mu4e-message-field msg :maildir)))
(string-prefix-p "/gatech" pfx)))) (string-prefix-p "/gatech" pfx))))
:vars '((mu4e-trash-folder . "/gatech/trash") :vars '((mu4e-trash-folder . "/gatech/trash")
(mu4e-drafts-folder . "/gatech/drafts") (mu4e-drafts-folder . "/gatech/drafts")
(mu4e-sent-folder . "/gatech/sent"))))) (mu4e-sent-folder . "/gatech/sent")
#+END_SRC (mu4e-sent-messages-behavior . sent)
** smtp (smtpmail-stream-type . starttls)
#+BEGIN_SRC emacs-lisp (smtpmail-smtp-server . "smtp.office365.com")
(require 'smtpmail) (smtpmail-smtp-service . 587)
(setq send-mail-function 'smtpmail-send-it (smtpmail-smtp-user . "ndwarshuis3@gatech.edu")
message-send-mail-function 'smtpmail-send-it (user-mail-address . "ndwarshuis3@gatech.edu")))
,(make-mu4e-context
user-mail-address "natedwarshuis@gmail.com" :name "emory"
user-full-name "Nate Dwarshuis" :match-func
(lambda (msg)
mu4e-sent-messages-behavior 'delete (when msg
(let ((pfx (mu4e-message-field msg :maildir)))
starttls-use-gnutls t (string-prefix-p "/emory" pfx))))
smtpmail-starttls-credentials '(("smtp.gmail.com" 587 nil nil)) :vars '((mu4e-trash-folder . "/emory/trash")
;; authinfo.gpg for credentials (mu4e-drafts-folder . "/emory/drafts")
smtpmail-default-smtp-server "smtp.gmail.com" (mu4e-sent-folder . "/emory/sent")
smtpmail-smtp-service 587 (mu4e-sent-messages-behavior . sent)
smtpmail-smtp-server "smtp.gmail.com") (smtpmail-stream-type . starttls)
(smtpmail-smtp-server . "smtp.office365.com")
(smtpmail-smtp-service . 587)
(smtpmail-smtp-user . "ndwarsh@emory.edu")
(user-mail-address . "ndwarsh@emory.edu")))))
#+END_SRC #+END_SRC
* shell * shell
#+begin_src emacs-lisp #+begin_src emacs-lisp