dotfiles/.emacs.d/mail/init.el

43 lines
1.5 KiB
EmacsLisp
Raw Permalink Normal View History

2024-08-27 21:29:05 +01:00
(cond ((find-font (font-spec :name "Noto Sans"))
(set-face-attribute 'default nil :font "Noto Sans-13")))
(use-package mu4e
:straight ( :host github :files ("build/mu4e/*.el") :repo "djcb/mu"
:pre-build (("./autogen.sh")
("ninja" "-C" "build")))
;;:load-path "/usr/share/emacs/site-lisp/mu4e/"
;; :defer 20 ; Wait until 20 seconds after startup
:config
;; This is set to 't' to avoid mail syncing issues when using mbsync
(setq mu4e-change-filenames-when-moving t)
;; Refresh mail using isync every 10 minutes
(setq mu4e-update-interval (* 10 60))
(setq mu4e-get-mail-command "mbsync -a")
(setq mu4e-maildir "/var/mail/arch")
(setq mu4e-drafts-folder "/Drafts")
(setq mu4e-sent-folder "/Sent")
(setq mu4e-refile-folder "/Archive")
(setq mu4e-trash-folder "/Trash")
(setq mu4e-maildir-shortcuts
'((:maildir "/inbox" :key ?i)
(:maildir "/Sent" :key ?s)
(:maildir "/Trash":key ?t)
(:maildir "/Archive":key ?a)
(:maildir "/Drafts" :key ?d)))
)
(setq smtpmail-smtp-server "smtp.fastmail.com"
smtpmail-smtp-service 465
smtpmail-stream-type 'ssl)
(setq message-send-mail-function 'smtpmail-send-it)
(setq user-full-name "Gabriel Simmer")
(setq smtpmail-local-domain "gmem.ca")
(setq user-mail-address (concat "g@" smtpmail-local-domain))
(fset 'my-move-to-trash "mT")
(define-key mu4e-headers-mode-map (kbd "d") 'my-move-to-trash)
(define-key mu4e-view-mode-map (kbd "d") 'my-move-to-trash)