about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el30
1 files changed, 28 insertions, 2 deletions
diff --git a/init.el b/init.el index 8946ce9..616edfb 100644 --- a/init.el +++ b/init.el
@@ -751,7 +751,17 @@ specific to most general, they are these:
751 (mu4e-refile-dir 751 (mu4e-refile-dir
752 . ,(concat work-mail-dir "/[Gmail]/All Mail")) 752 . ,(concat work-mail-dir "/[Gmail]/All Mail"))
753 (mu4e-trash-folder 753 (mu4e-trash-folder
754 . ,(concat work-mail-dir "/[Gmail]/Trash")))) 754 . ,(concat work-mail-dir "/[Gmail]/Trash"))
755 (mu4e-maildir-shortcuts
756 . ,(mapcar (lambda (cell)
757 (let ((dir (car cell))
758 (char (cdr cell)))
759 (cons (concat work-mail-dir dir) char)))
760 '(("/Inbox" . ?i)
761 ("/[Gmail]/All Mail" . ?a)
762 ("/[Gmail]/Sent" . ?s)
763 ("/[Gmail]/Drafts" . ?d)
764 ("/[Gmail]/Trash" . ?t))))))
755 ;; Home 765 ;; Home
756 (make-mu4e-context 766 (make-mu4e-context
757 :name "Home" 767 :name "Home"
@@ -771,10 +781,26 @@ specific to most general, they are these:
771 (mu4e-refile-folder 781 (mu4e-refile-folder
772 . ,(concat home-mail-dir "/Archive")) 782 . ,(concat home-mail-dir "/Archive"))
773 (mu4e-trash-folder 783 (mu4e-trash-folder
774 . ,(concat home-mail-dir "/Trash"))))) 784 . ,(concat home-mail-dir "/Trash"))
785 (mu4e-maildir-shortcuts
786 . ,(mapcar (lambda (cell)
787 (let ((dir (car cell))
788 (char (cdr cell)))
789 (cons (concat home-mail-dir dir) char)))
790 '(("/INBOX" . ?i)
791 ("/Archive" . ?a)
792 ("/Sent" . ?s)
793 ("/Drafts" . ?d)
794 ("/Trash" . ?t)))))))
775 mu4e-get-mail-command "mbsync -a" 795 mu4e-get-mail-command "mbsync -a"
776 mu4e-maildir "~/mail" 796 mu4e-maildir "~/mail"
777 mu4e-update-interval (* 10 60) 797 mu4e-update-interval (* 10 60)
798 sendmail-send-program (seq-some #'executable-find
799 '("msmtp"
800 "sendmail"))
801 message-sendmail-f-is-evil t
802 message-sendmail-extra-arguments '("--read-envelope-from")
803 message-send-mail-function #'message-send-mail-with-sendmail
778 send-mail-function #'smtpmail-send-it 804 send-mail-function #'smtpmail-send-it
779 smtpmail-smtp-service 465 805 smtpmail-smtp-service 465
780 smtpmail-stream-type 'ssl) 806 smtpmail-stream-type 'ssl)