diff options
| author | Ravi R Kiran <aine.marina@gmail.com> | 2014-07-08 16:46:15 (GMT) |
|---|---|---|
| committer | Ravi R Kiran <aine.marina@gmail.com> | 2014-07-08 16:50:33 (GMT) |
| commit | eed3dd09cfbccae4e7cb60be636cae3382d98709 (patch) | |
| tree | 0b31c375b23013a21f93d32c2281c970958bc851 /ravi-init-mu.el | |
| parent | 5e5775741bc886f2ef1c7473c322d52d5c20ec12 (diff) | |
| download | dotemacs-eed3dd09cfbccae4e7cb60be636cae3382d98709.zip dotemacs-eed3dd09cfbccae4e7cb60be636cae3382d98709.tar.gz dotemacs-eed3dd09cfbccae4e7cb60be636cae3382d98709.tar.bz2 | |
Set up defaults and prevent answering to self
Diffstat (limited to 'ravi-init-mu.el')
| -rw-r--r-- | ravi-init-mu.el | 19 |
1 files changed, 15 insertions, 4 deletions
diff --git a/ravi-init-mu.el b/ravi-init-mu.el index 63d5844..e2a040f 100644 --- a/ravi-init-mu.el +++ b/ravi-init-mu.el @@ -26,12 +26,20 @@ ;;; Code: +(defvar ravi/use-mu-for-email nil + "Use mu for email") +(defvar ravi/mu4e-account-alist nil + "An alist containing account information for all accounts") +(defvar ravi/mu4e-update-interval 1800 ; 30 minutes + "Basic update interval; all other update intervals are multiples") + (when ravi/use-mu-for-email (use-package mu4e :load-path ,(ravi/emacs-file "site-lisp/mu/mu4e") :commands mu4e :init (progn + (add-to-list 'Info-default-directory-list (ravi/emacs-file "site-lisp/mu/mu4e")) (unless ravi/mu4e-account-alist (error "Email account list not found"))) :config (progn @@ -81,6 +89,11 @@ (error "No email account found")))) (add-hook 'mu4e-compose-pre-hook 'ravi/mu4e-set-account) + (setq mu4e-compose-dont-reply-to-self t) + (defun ravi/set-self-addresses () + (setq mu4e-user-mail-address-list (list user-mail-address))) + (add-hook 'mu4e-compose-pre-hook 'ravi/set-self-addresses) + ;; Use async method of sending email, if possible (use-package async :config @@ -98,9 +111,8 @@ ;; Currently, poll all accounts all the time == to do: fix mail intervals per account (setq mu4e-get-mail-command (concat (ravi/emacs-file "site-lisp/isync/src/mbsync") " -a -q -q")) - (if (boundp 'ravi/mu4e-update-interval) - (setq mu4e-update-interval ravi/mu4e-update-interval) - (setq mu4e-update-interval 1800)) ; pull every 30 minutes + (setq mu4e-update-interval ravi/mu4e-update-interval) + (setq mu4e-change-filenames-when-moving t) ;; User interface (setq mu4e-html-renderer 'w3m) @@ -137,7 +149,6 @@ (add-to-list 'smart-tab-disabled-major-modes 'mu4e-compose-mode) (imagemagick-register-types) - (add-to-list 'Info-default-directory-list (ravi/emacs-file "site-lisp/mu/mu4e")) ) ) ) |