forked from cemkeylan/mu-wizard
-
Notifications
You must be signed in to change notification settings - Fork 0
/
mu4e-config.el
40 lines (32 loc) · 1.22 KB
/
mu4e-config.el
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
;;; mu4e-config.el -- Configuration Options for mu4e -*- lexical-binding: t -*-
;;; Commentary:
;; This is a template configuration for mu4e, the basic stuff. This can be
;; called from the init.el by running
;;
;; (load-file "~/.config/mu4e/mu4e-config.el")
;;
;; My knowledge of Lisp isn't great. I have been using Emacs for a few months
;; and this is my first project including Lisp. So please bear with me. I
;; would be happy to receive PRs.
;;; Code:
(require 'mu4e nil t)
(require 'message)
(require 'sendmail)
(defvar mu4e-get-mail-command)
(defvar mu4e-contexts)
(defvar mu4e-sent-messages-behavior)
(defvar config-home)
(setq mu4e-get-mail-command "mbsync -a"
mail-user-agent 'mu4e-user-agent
message-send-mail-function 'message-send-mail-with-sendmail
sendmail-program (executable-find "msmtp")
mu4e-sent-messages-behavior 'delete
config-home (or (getenv "XDG_CONFIG_HOME") "~/.config"))
;; Make mu4e-contexts an empty list.
(setq mu4e-contexts ())
;; Load user accounts.
(dolist (file (directory-files
(expand-file-name "mu4e/accounts" config-home) t "\.el$" nil))
(load file))
(provide 'mu4e-config)
;;; mu4e-config.el ends here