summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--.config/emacs/jd/jd-mu4e.el33
-rw-r--r--Mail.org126
2 files changed, 84 insertions, 75 deletions
diff --git a/.config/emacs/jd/jd-mu4e.el b/.config/emacs/jd/jd-mu4e.el
index cda39f2..cc0eb24 100644
--- a/.config/emacs/jd/jd-mu4e.el
+++ b/.config/emacs/jd/jd-mu4e.el
@@ -1,3 +1,5 @@
1(add-to-list 'load-path "/usr/share/emacs/site-lisp/mu4e")
2
1(use-package org-msg) 3(use-package org-msg)
2 4
3(use-package mu4e 5(use-package mu4e
@@ -26,26 +28,29 @@
26 (mu4e-trash-folder . "/abaks/Trash") 28 (mu4e-trash-folder . "/abaks/Trash")
27 (mu4e-drafts-folder . "/abaks/Drafts") 29 (mu4e-drafts-folder . "/abaks/Drafts")
28 (mu4e-refile-folder . "/abaks/Archive") 30 (mu4e-refile-folder . "/abaks/Archive")
31 (smtpmail-local-domain . "pl")
32 (smtpmail-smtp-server . "smtp.abaks.pl")
29 (mu4e-sent-messages-behavior . sent) 33 (mu4e-sent-messages-behavior . sent)
30 )) 34 ))
31 ,(make-mu4e-context 35 ,(make-mu4e-context
32 :name "Gmail" 36 :name "Gmail"
33 :match-func (lambda (msg) (when msg 37 :match-func (lambda (msg) (when msg
34 (string-prefix-p "/gmail" (mu4e-message-field msg :maildir)))) 38 (string-prefix-p "/gmail" (mu4e-message-field msg :maildir))))
35 :vars '( 39 :vars '(
36 (user-full-name . "Jakub Dlugosz") 40 (user-full-name . "Jakub Dlugosz")
37 (user-mail-address . "jdlugosz963@gmail.pl") 41 (user-mail-address . "jdlugosz963@gmail.com")
38 (mu4e-sent-folder . "/gmail/\[Gmail\]/Wys\&AUI-ane") 42 (mu4e-sent-folder . "/gmail/\[Gmail\]/Wys\&AUI-ane")
39 (mu4e-trash-folder . "/gmail/\[Gmail\]/Kosz") 43 (mu4e-trash-folder . "/gmail/\[Gmail\]/Kosz")
40 (mu4e-drafts-folder . "/gmail/\[Gmail\]/Wersje\ robocze") 44 (mu4e-drafts-folder . "/gmail/\[Gmail\]/Wersje\ robocze")
41 (mu4e-refile-folder . "/gmail/Archive") 45 (mu4e-refile-folder . "/gmail/Archive")
42 (mu4e-sent-messages-behavior . sent) 46 (smtpmail-local-domain . "com")
43 )))) 47 (smtpmail-smtp-server . "smtp.gmail.com")
48 (mu4e-sent-messages-behavior . sent)
49 ))))
44 50
45 (setq mail-user-agent 'mu4e-user-agent 51 (setq mail-user-agent 'mu4e-user-agent
52 mail-host-address nil
46 message-send-mail-function 'smtpmail-send-it 53 message-send-mail-function 'smtpmail-send-it
47 smtpmail-smtp-server "smtp.abaks.pl"
48 smtpmail-local-domain "pl"
49 smtpmail-smtp-service 465 54 smtpmail-smtp-service 465
50 smtpmail-stream-type 'ssl) 55 smtpmail-stream-type 'ssl)
51 56
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