summaryrefslogtreecommitdiffstats
path: root/Mail.org
diff options
context:
space:
mode:
Diffstat (limited to 'Mail.org')
-rw-r--r--Mail.org126
1 files changed, 65 insertions, 61 deletions
diff --git a/Mail.org b/Mail.org
index b0c8449..c749918 100644
--- a/Mail.org
+++ b/Mail.org
@@ -3,67 +3,71 @@
3 3
4* jd-mu4e.el 4* jd-mu4e.el
5#+begin_src emacs-lisp 5#+begin_src emacs-lisp
6 6 (add-to-list 'load-path "/usr/share/emacs/site-lisp/mu4e")
7 (use-package org-msg) 7
8 8 (use-package org-msg)
9 (use-package mu4e 9
10 :defer 20 10 (use-package mu4e
11 :ensure nil 11 :defer 20
12 :config 12 :ensure nil
13 (require 'org-mu4e) 13 :config
14 14 (require 'org-mu4e)
15 (setq mu4e-update-interval (* 10 60)) 15
16 (setq mu4e-get-mail-command "mbsync -a") 16 (setq mu4e-update-interval (* 10 60))
17 (setq mu4e-maildir "~/Mail") 17 (setq mu4e-get-mail-command "mbsync -a")
18 18 (setq mu4e-maildir "~/Mail")
19 (setq mu4e-completing-read-function #'ivy-completing-read) 19
20 20 (setq mu4e-completing-read-function #'ivy-completing-read)
21 (setq mu4e-change-filenames-when-moving t) 21
22 22 (setq mu4e-change-filenames-when-moving t)
23 (setq mu4e-contexts 23
24 `(,(make-mu4e-context 24 (setq mu4e-contexts
25 :name "Abaks" 25 `(,(make-mu4e-context
26 :match-func (lambda (msg) (when msg 26 :name "Abaks"
27 (string-prefix-p "/abaks" (mu4e-message-field msg :maildir)))) 27 :match-func (lambda (msg) (when msg
28 :vars '( 28 (string-prefix-p "/abaks" (mu4e-message-field msg :maildir))))
29 (user-full-name . "Jakub Dlugosz") 29 :vars '(
30 (user-mail-address . "jakub@abaks.pl") 30 (user-full-name . "Jakub Dlugosz")
31 (mu4e-sent-folder . "/abaks/Sent Items") 31 (user-mail-address . "jakub@abaks.pl")
32 (mu4e-trash-folder . "/abaks/Trash") 32 (mu4e-sent-folder . "/abaks/Sent Items")
33 (mu4e-drafts-folder . "/abaks/Drafts") 33 (mu4e-trash-folder . "/abaks/Trash")
34 (mu4e-refile-folder . "/abaks/Archive") 34 (mu4e-drafts-folder . "/abaks/Drafts")
35 (mu4e-sent-messages-behavior . sent) 35 (mu4e-refile-folder . "/abaks/Archive")
36 )) 36 (smtpmail-local-domain . "pl")
37 ,(make-mu4e-context 37 (smtpmail-smtp-server . "smtp.abaks.pl")
38 :name "Gmail" 38 (mu4e-sent-messages-behavior . sent)
39 :match-func (lambda (msg) (when msg 39 ))
40 (string-prefix-p "/gmail" (mu4e-message-field msg :maildir)))) 40 ,(make-mu4e-context
41 :vars '( 41 :name "Gmail"
42 (user-full-name . "Jakub Dlugosz") 42 :match-func (lambda (msg) (when msg
43 (user-mail-address . "jdlugosz963@gmail.pl") 43 (string-prefix-p "/gmail" (mu4e-message-field msg :maildir))))
44 (mu4e-sent-folder . "/gmail/\[Gmail\]/Wys\&AUI-ane") 44 :vars '(
45 (mu4e-trash-folder . "/gmail/\[Gmail\]/Kosz") 45 (user-full-name . "Jakub Dlugosz")
46 (mu4e-drafts-folder . "/gmail/\[Gmail\]/Wersje\ robocze") 46 (user-mail-address . "jdlugosz963@gmail.com")
47 (mu4e-refile-folder . "/gmail/Archive") 47 (mu4e-sent-folder . "/gmail/\[Gmail\]/Wys\&AUI-ane")
48 (mu4e-sent-messages-behavior . sent) 48 (mu4e-trash-folder . "/gmail/\[Gmail\]/Kosz")
49 )))) 49 (mu4e-drafts-folder . "/gmail/\[Gmail\]/Wersje\ robocze")
50 50 (mu4e-refile-folder . "/gmail/Archive")
51 (setq mail-user-agent 'mu4e-user-agent 51 (smtpmail-local-domain . "com")
52 message-send-mail-function 'smtpmail-send-it 52 (smtpmail-smtp-server . "smtp.gmail.com")
53 smtpmail-smtp-server "smtp.abaks.pl" 53 (mu4e-sent-messages-behavior . sent)
54 smtpmail-local-domain "pl" 54 ))))
55 smtpmail-smtp-service 465 55
56 smtpmail-stream-type 'ssl) 56 (setq mail-user-agent 'mu4e-user-agent
57 57 mail-host-address nil
58 (mu4e t)) 58 message-send-mail-function 'smtpmail-send-it
59 59 smtpmail-smtp-service 465
60 (jd/leader-key-def 60 smtpmail-stream-type 'ssl)
61 "m" '(:ignore t :which-key "mail") 61
62 "mm" 'mu4e 62 (mu4e t))
63 "mc" 'mu4e-compose-new) 63
64 64 (jd/leader-key-def
65 65 "m" '(:ignore t :which-key "mail")
66 (provide 'jd-mu4e) 66 "mm" 'mu4e
67 "mc" 'mu4e-compose-new)
68
69
70 (provide 'jd-mu4e)
67 71
68#+end_src 72#+end_src
69 73