46 lines
2.1 KiB
EmacsLisp
46 lines
2.1 KiB
EmacsLisp
;;; +mail.el -*- lexical-binding: t; -*-
|
|
;; Mu4e configuration
|
|
;;
|
|
;; Set up the default email identity
|
|
(setq user-full-name "Amin Kasrou Aouam")
|
|
;; Use msmtp to send email
|
|
(setq sendmail-program (executable-find "msmtp")
|
|
send-mail-function #'smtpmail-send-it
|
|
message-sendmail-f-is-evil t
|
|
message-sendmail-extra-arguments '("--read-envelope-from")
|
|
message-send-mail-function #'message-send-mail-with-sendmail)
|
|
;; Account configuration
|
|
(set-email-account! "gmail"
|
|
'((mu4e-sent-folder . "/gmail/sent")
|
|
(mu4e-drafts-folder . "/gmail/drafts")
|
|
(mu4e-trash-folder . "/gmail/trash")
|
|
(mu4e-refile-folder . "/gmail/archive")
|
|
(smtpmail-smtp-user . "akasroua@gmail.com")
|
|
(user-mail-address . "akasroua@gmail.com"))
|
|
t)
|
|
(set-email-account! "ugent"
|
|
'((mu4e-sent-folder . "/ugent/sent")
|
|
(mu4e-drafts-folder . "/ugent/drafts")
|
|
(mu4e-trash-folder . "/ugent/trash")
|
|
(mu4e-refile-folder . "/ugent/archive")
|
|
(smtpmail-smtp-user . "amin.kasrouaouam@ugent.be")
|
|
(user-mail-address . "amin.kasrouaouam@ugent.be"))
|
|
t)
|
|
(set-email-account! "disroot"
|
|
'((mu4e-sent-folder . "/disroot/sent")
|
|
(mu4e-drafts-folder . "/disroot/drafts")
|
|
(mu4e-trash-folder . "/disroot/trash")
|
|
(mu4e-refile-folder . "/disroot/archive")
|
|
(smtpmail-smtp-user . "akasroua@disroot.org")
|
|
(user-mail-address . "akasroua@disroot.org"))
|
|
t)
|
|
;; Configure mu4e contexts
|
|
(setq mu4e-context-policy 'ask-if-none
|
|
mu4e-compose-context-policy 'ask-if-none)
|
|
;; Run lazy check when syncing
|
|
(setq mu4e-index-lazy-check t)
|
|
;; Use ISO dates
|
|
(setq mu4e-headers-date-format "%Y-%m-%d %H:%M")
|
|
;; Disable colors for HTML emails
|
|
(setq shr-use-colors nil)
|