First mu4e setup
This commit is contained in:
Charlotte Van Petegem
parent
bbe11687c0
commit
690d57b53b
2 changed files with 144 additions and 15 deletions
|
|
@ -16,6 +16,10 @@
|
||||||
config = ./emacs/init.el;
|
config = ./emacs/init.el;
|
||||||
package = pkgs.emacsPgtk;
|
package = pkgs.emacsPgtk;
|
||||||
alwaysEnsure = true;
|
alwaysEnsure = true;
|
||||||
|
extraEmacsPackages = epkgs: [
|
||||||
|
# mu4e is included in the mu package and should be used from there
|
||||||
|
pkgs.mu
|
||||||
|
];
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
home.file = {
|
home.file = {
|
||||||
|
|
|
||||||
|
|
@ -18,6 +18,8 @@
|
||||||
|
|
||||||
(nmap
|
(nmap
|
||||||
:prefix "SPC"
|
:prefix "SPC"
|
||||||
|
"SPC" '(:ignore t :which-key "mode")
|
||||||
|
|
||||||
"b" '(:ignore t :which-key "buffer")
|
"b" '(:ignore t :which-key "buffer")
|
||||||
"bd" '(kill-this-buffer :which-key "kill")
|
"bd" '(kill-this-buffer :which-key "kill")
|
||||||
|
|
||||||
|
|
@ -26,10 +28,8 @@
|
||||||
|
|
||||||
"h" '(:ignore t :which-key "help")
|
"h" '(:ignore t :which-key "help")
|
||||||
|
|
||||||
"m" '(:ignore t :which-key "mode")
|
|
||||||
|
|
||||||
"q" '(:ignore t :which-key "quit")
|
"q" '(:ignore t :which-key "quit")
|
||||||
"qq" '(save-buffers-kill-emacs :which-key "quit"))
|
"qq" '(save-buffers-kill-emacs :which-key "quit")
|
||||||
|
|
||||||
"s" '(:ignore t :which-key "search")
|
"s" '(:ignore t :which-key "search")
|
||||||
|
|
||||||
|
|
@ -38,6 +38,7 @@
|
||||||
"ws" '(split-window-horizontally :which-key "split horizontal")
|
"ws" '(split-window-horizontally :which-key "split horizontal")
|
||||||
"wd" '(delete-window :which-key "delete")
|
"wd" '(delete-window :which-key "delete")
|
||||||
)
|
)
|
||||||
|
)
|
||||||
|
|
||||||
;; Better defaults that aren't defaults for some reason.
|
;; Better defaults that aren't defaults for some reason.
|
||||||
(use-package better-defaults)
|
(use-package better-defaults)
|
||||||
|
|
@ -56,12 +57,12 @@
|
||||||
:general
|
:general
|
||||||
(nmap
|
(nmap
|
||||||
:prefix "SPC"
|
:prefix "SPC"
|
||||||
"SPC" '(counsel-M-x :which-key "execute")
|
"x" '(counsel-M-x :which-key "execute")
|
||||||
"bb" '(counsel-switch-buffer :which-key "switch")
|
"bb" '(counsel-switch-buffer :which-key "switch")
|
||||||
"ff" '(counsel-find-file :which-key "find")
|
"ff" '(counsel-find-file :which-key "find")
|
||||||
"fr" '(counsel-recentf :which-key "recent")
|
"fr" '(counsel-recentf :which-key "recent")
|
||||||
"ha" '(counsel-apropos :which-key "apropos")
|
"ha" '(counsel-apropos :which-key "apropos")
|
||||||
"hd" '(counsel-descbinds :which-key "bindings")
|
"hb" '(counsel-descbinds :which-key "bindings")
|
||||||
"hf" '(counsel-describe-function :which-key "function")
|
"hf" '(counsel-describe-function :which-key "function")
|
||||||
"hv" '(counsel-describe-variable :which-key "variable")
|
"hv" '(counsel-describe-variable :which-key "variable")
|
||||||
)
|
)
|
||||||
|
|
@ -155,6 +156,130 @@
|
||||||
(modus-themes-load-operandi)
|
(modus-themes-load-operandi)
|
||||||
)
|
)
|
||||||
|
|
||||||
|
(use-package mu4e
|
||||||
|
;; Use mu4e included in the mu package, see emacs.nix
|
||||||
|
:ensure nil
|
||||||
|
:demand t
|
||||||
|
:custom
|
||||||
|
(mu4e-change-filenames-when-moving t "Avoid sync issues with mbsync")
|
||||||
|
(mu4e-maildir "/home/charlotte/mail" "Root of the maildir hierarchy")
|
||||||
|
(mu4e-context-policy 'pick-first "Use the first mail context in the list")
|
||||||
|
(mu4e-compose-format-flowed t "Flow emails correctly for recipients")
|
||||||
|
(mu4e-attachment-dir "/home/charlotte/downloads" "Save attachments to downloads folder")
|
||||||
|
(mu4e-compose-dont-reply-to-self t "Don't reply to mysel on reply to all")
|
||||||
|
(mu4e-confirm-quit nil "Don't confirm when quitting")
|
||||||
|
(message-kill-buffer-on-exit t "Close buffer when finished with email")
|
||||||
|
(sendmail-program "msmtp" "Use msmtp to send email")
|
||||||
|
(message-sendmail-f-is-evil t "Remove username from the emacs message")
|
||||||
|
(message-send-mail-function 'message-send-mail-with-sendmail "Use sendmail to send mail instead internal smtp")
|
||||||
|
(message-cite-reply-position 'below)
|
||||||
|
:config
|
||||||
|
(setq mu4e-contexts
|
||||||
|
(list
|
||||||
|
(make-mu4e-context
|
||||||
|
:name "Personal"
|
||||||
|
:match-func (lambda (msg) (when msg (string-prefix-p "/personal" (mu4e-message-field msg :maildir))))
|
||||||
|
:vars '(
|
||||||
|
(user-mail-address . "charlotte@vanpetegem.me")
|
||||||
|
(user-full-name . "Charlotte Van Petegem")
|
||||||
|
(mu4e-drafts-folder . "/personal/Drafts")
|
||||||
|
(mu4e-sent-folder . "/personal/INBOX")
|
||||||
|
(mu4e-refile-folder . "/personal/Archive")
|
||||||
|
(mu4e-trash-folder . "/personal/Trash")
|
||||||
|
(message-sendmail-extra-arguments . ("--read-envelope-from" "--account" "personal"))
|
||||||
|
)
|
||||||
|
)
|
||||||
|
(make-mu4e-context
|
||||||
|
:name "Work"
|
||||||
|
:match-func (lambda (msg) (when msg (string-prefix-p "/work/" (mu4e-message-field msg :maildir))))
|
||||||
|
:vars '(
|
||||||
|
(user-mail-address . "charlotte.vanpetegem@ugent.be")
|
||||||
|
(user-full-name . "Charlotte Van Petegem")
|
||||||
|
(mu4e-drafts-folder . "/work/Drafts")
|
||||||
|
(mu4e-sent-folder . "/work/INBOX")
|
||||||
|
(mu4e-refile-folder . "/work/Archive")
|
||||||
|
(mu4e-trash-folder . "/work/Deleted Items")
|
||||||
|
(message-sendmail-extra-arguments . ("--read-envelope-from" "--account" "work"))
|
||||||
|
)
|
||||||
|
)
|
||||||
|
(make-mu4e-context
|
||||||
|
:name "Work AAP-WE-FR"
|
||||||
|
:match-func (lambda (msg) (when msg (string-prefix-p "/work-aap-we-fr" (mu4e-message-field msg :maildir))))
|
||||||
|
:vars '(
|
||||||
|
(user-mail-address . "aap-we-fr@ugent.be")
|
||||||
|
(user-full-name . "Charlotte Van Petegem")
|
||||||
|
(mu4e-drafts-folder . "/work-aap-we-fr/Concepten")
|
||||||
|
(mu4e-sent-folder . "/work-aap-we-fr/Verzonden items")
|
||||||
|
(mu4e-refile-folder . "/work-aap-we-fr/Archief")
|
||||||
|
(mu4e-trash-folder . "/work-aap-we-fr/Verwijderde items")
|
||||||
|
(message-sendmail-extra-arguments . ("--read-envelope-from" "--account" "work-aap-we-fr"))
|
||||||
|
)
|
||||||
|
)
|
||||||
|
(make-mu4e-context
|
||||||
|
:name "Posteo"
|
||||||
|
:match-func (lambda (msg) (when msg (string-prefix-p "/posteo" (mu4e-message-field msg :maildir))))
|
||||||
|
:vars '(
|
||||||
|
(user-mail-address . "charlotte@vanpetegem.me")
|
||||||
|
(user-full-name . "Charlotte Van Petegem")
|
||||||
|
(mu4e-drafts-folder . "/posteo/Drafts")
|
||||||
|
(mu4e-sent-folder . "/posteo/INBOX")
|
||||||
|
(mu4e-refile-folder . "/posteo/Archive")
|
||||||
|
(mu4e-trash-folder . "/posteo/Trash")
|
||||||
|
(message-sendmail-extra-arguments . ("--read-envelope-from" "--account" "posteo"))
|
||||||
|
)
|
||||||
|
)
|
||||||
|
(make-mu4e-context
|
||||||
|
:name "Jong Groen"
|
||||||
|
:match-func (lambda (msg) (when msg (string-prefix-p "/jonggroen" (mu4e-message-field msg :maildir))))
|
||||||
|
:vars '(
|
||||||
|
(user-mail-address . "charlotte@vanpetegem.me")
|
||||||
|
(user-full-name . "Charlotte Van Petegem")
|
||||||
|
(mu4e-drafts-folder . "/jonggroen/[Gmail]/Drafts")
|
||||||
|
(mu4e-sent-folder . "/jonggroen/INBOX")
|
||||||
|
(mu4e-refile-folder . "/jonggroen/Archive")
|
||||||
|
(mu4e-trash-folder . "/jonggroen/[Gmail]/Bin")
|
||||||
|
(message-sendmail-extra-arguments . ("--read-envelope-from" "--account" "jonggroen"))
|
||||||
|
)
|
||||||
|
)
|
||||||
|
(make-mu4e-context
|
||||||
|
:name "Postbot"
|
||||||
|
:match-func (lambda (msg) (when msg (string-prefix-p "/postbot" (mu4e-message-field msg :maildir))))
|
||||||
|
:vars '(
|
||||||
|
(user-mail-address . "postbot@vanpetegem.me")
|
||||||
|
(user-full-name . "Charlotte Van Petegem")
|
||||||
|
(mu4e-drafts-folder . "/postbot/Drafts")
|
||||||
|
(mu4e-sent-folder . "/postbot/INBOX")
|
||||||
|
(mu4e-refile-folder . "/postbot/Archive")
|
||||||
|
(mu4e-trash-folder . "/postbot/Trash")
|
||||||
|
(message-sendmail-extra-arguments . ("--read-envelope-from" "--account" "postbot"))
|
||||||
|
)
|
||||||
|
)
|
||||||
|
(make-mu4e-context
|
||||||
|
:name "Webmaster"
|
||||||
|
:match-func (lambda (msg) (when msg (string-prefix-p "/webmaster" (mu4e-message-field msg :maildir))))
|
||||||
|
:vars '(
|
||||||
|
(user-mail-address . "webmaster@vanpetegem.me")
|
||||||
|
(user-full-name . "Webmaster")
|
||||||
|
(mu4e-drafts-folder . "/webmaster/Drafts")
|
||||||
|
(mu4e-sent-folder . "/webmaster/INBOX")
|
||||||
|
(mu4e-refile-folder . "/webmaster/Archive")
|
||||||
|
(mu4e-trash-folder . "/webmaster/Trash")
|
||||||
|
(message-sendmail-extra-arguments . ("--read-envelope-from" "--account" "webmaster"))
|
||||||
|
)
|
||||||
|
)
|
||||||
|
)
|
||||||
|
)
|
||||||
|
(add-to-list
|
||||||
|
'mu4e-bookmarks
|
||||||
|
'(:name "Combined inbox" :query "maildir:/personal/INBOX or maildir:/work/INBOX or maildir:/posteo/INBOX or maildir:/jonggroen/INBOX" :key ?i)
|
||||||
|
)
|
||||||
|
:general
|
||||||
|
(nmap
|
||||||
|
:prefix "SPC"
|
||||||
|
"m" '(mu4e :which-key "mail")
|
||||||
|
)
|
||||||
|
)
|
||||||
|
|
||||||
;; Nix syntax support
|
;; Nix syntax support
|
||||||
(use-package nix-mode :mode "\\.nix\\'")
|
(use-package nix-mode :mode "\\.nix\\'")
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue