oreodave/dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

~move around a few configuration options, +mail/local-dir

Browse Source 
New local directory for mail in user-emacs-directory
This commit is contained in:
Aryadev Chavali
2020-08-18 22:13:08 +01:00
parent ac7f1846c6
commit 783fa1fe8c
1 changed files with 11 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
Emacs/.config/emacs/config.org
View File

@@ -456,19 +456,24 @@ integrate it into my workflow just a bit better.
** Notmuch ** Notmuch
#+begin_src emacs-lisp #+begin_src emacs-lisp
(setq +mail/signature "---------------\nAryadev Chavali") (setq +mail/signature "---------------\nAryadev Chavali")
(defconst +mail/local-dir (concat user-emacs-directory ".mail/"))
(defun +mail/sync-mail ()
"Sync mail via mbsync."
(interactive)
(start-process-shell-command "" nil "mbsync -a"))
(use-package notmuch (use-package notmuch
:commands notmuch :commands notmuch
:general :general
(leader "am" #'notmuch) (leader "am" #'notmuch)
:custom :custom
((notmuch-show-logo nil) ((notmuch-show-logo nil)
(mail-signature +mail/signature)
(mail-default-directory +mail/local-dir)
(mail-source-directory +mail/local-dir)
(message-signature +mail/signature) (message-signature +mail/signature)
(mail-signature +mail/signature)) (message-auto-save-directory +mail/local-dir)
:init (message-directory +mail/local-dir))
(defun +mail/sync-mail ()
"Sync mail via mbsync."
(interactive)
(start-process-shell-command "" nil "mbsync -a"))
:config :config
(evil-define-key 'normal notmuch-hello-mode-map "M" #'+mail/sync-mail) (evil-define-key 'normal notmuch-hello-mode-map "M" #'+mail/sync-mail)
(evil-collection-notmuch-setup)) (evil-collection-notmuch-setup))