blob: 64235077a5aaae49d8a611c3207acb811ab68e6d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
;;; td-mu4e.el --- the superior email client -*- lexical-binding: t; -*-
;;; Code:
(use-package mu4e
:ensure nil
:bind (("C-c m m" . mu4e)
("C-c m c" . 'mu4e-compose-new)
("C-c m u" . 'mu4e-update-mail-and-index))
:config
(setq mu4e-maildir "~/Mail")
;; IMAP options.
(setq mu4e-update-interval (* 5 60))
(setq mu4e-get-mail-command "mbsync -a")
(setq mu4e-change-filenames-when-moving t)
;; SMTP options.
(setq message-send-mail-function 'message-send-mail-with-sendmail)
(setq sendmail-program "/etc/profiles/per-user/tdback/bin/msmtp")
;; Compose options.
(setq mu4e-compose-format-flowed t)
(setq mu4e-compose-dont-reply-to-self t)
(setq message-kill-buffer-on-exit t)
;; Display options.
(setq mu4e-view-show-images t)
(setq mu4e-view-show-addresses t)
(setq mu4e-modeline-show-global nil)
(setq mu4e-contexts
(list
;; Personal account.
(make-mu4e-context
:name "Personal"
:vars '((user-mail-address . "tyler@tdback.net")
(user-full-name . "Tyler Dunneback")
(mu4e-compose-signature . "Tyler Dunneback")
(mu4e-drafts-folder . "/tdback/Drafts")
(mu4e-sent-folder . "/tdback/Sent")
(mu4e-refile-folder . "/tdback/Archive")
(mu4e-trash-folder . "/tdback/Trash")))))
(setq mu4e-maildir-shortcuts
'(("/tdback/Inbox" . ?i)
("/tdback/Sent" . ?s)
("/tdback/Trash" . ?t)
("/tdback/Drafts" . ?d)
("/tdback/Archive" . ?a)
("/tdback/All Mail" . ?m))))
(use-package org-mime
:ensure t
:config
(setq org-mime-export-options (list :section-numbers nil
:with-author nil
:with-toc nil))
(add-hook 'org-mime-html-hook (lambda ()
(org-mime-change-element-style
"pre" (format "color: %s; background-color: %s; padding: 0.5em;"
"#E6E1DC" "#232323"))))
(add-hook 'message-send-hook 'org-mime-confirm-when-no-multipart))
(provide 'td-mu4e)
;;; td-mu4e.el ends here
|
