From 8694e843f6900d27a70a10d5afb034d98a1fb7bc Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Thu, 12 Oct 2023 00:03:07 +0300 Subject: emacs:(mu4e) Adjust for new values with uni's gmail account --- .emacs.d/modules/thanos-mu4e.el | 28 ++++++++++++++-------------- 1 file changed, 14 insertions(+), 14 deletions(-) (limited to '.emacs.d') diff --git a/.emacs.d/modules/thanos-mu4e.el b/.emacs.d/modules/thanos-mu4e.el index e108ade..1ef42cd 100644 --- a/.emacs.d/modules/thanos-mu4e.el +++ b/.emacs.d/modules/thanos-mu4e.el @@ -31,9 +31,7 @@ (require 'smtpmail) - -(when is-zeus - (add-to-list 'load-path "/usr/share/emacs/site-lisp/mu4e/")) +(add-to-list 'load-path "/usr/share/emacs/site-lisp/mu4e/") (require 'mu4e) @@ -70,10 +68,10 @@ (setf mu4e-change-filenames-when-moving t) (setf mu4e-maildir-shortcuts - '(("/Public/Inbox" . ?I) - ("/Inbox" . ?i) + '(("/Inbox" . ?i) ("/Sent" . ?s) - ("/Emacs/dev" . ?e))) + ("/Emacs/dev" . ?e) + ("/MUSofia/[Gmail]/All Mail" . ?u))) (setf mu4e-contexts (list @@ -82,25 +80,27 @@ :match-func (lambda (msg) (when msg - (string-prefix-p "/" (mu4e-message-field msg :maildir)))) + (string-prefix-p "/Fastmail" (mu4e-message-field msg :maildir)))) :vars '((user-mail-address . "public@thanosapollo.com") (user-full-name . "Thanos Apollo") + (smtpmail-smtp-server . "smtp.fastmail.com") + (smtpmail-smtp-service . 465) + (smtpmail-stream-type . ssl) (mu4e-drafts-folder . "/Drafts") (mu4e-sent-folder . "/Sent") (mu4e-refile-folder . "/Archive") (mu4e-trash-folder . "/Trash"))) (make-mu4e-context - :name "Fastmail" + :name "MUSofia" :match-func (lambda (msg) (when msg - (string-prefix-p "/" (mu4e-message-field msg :maildir)))) - :vars '((user-mail-address . "thanosapollo@fastmail.com") + (string-prefix-p "/MUSofia" (mu4e-message-field msg :maildir)))) + :vars '((user-mail-address . "104111@students.mu-sofia.bg") (user-full-name . "Thanos Apollo") - (mu4e-drafts-folder . "/Drafts") - (mu4e-sent-folder . "/Sent") - (mu4e-refile-folder . "/Archive") - (mu4e-trash-folder . "/Trash"))))) + (smtpmail-smtp-server . "smtp.gmail.com") + (smtpmail-smtp-service . 465) + (smtpmail-stream-type . ssl))))) (setf message-send-mail-function 'smtpmail-send-it smtpmail-smtp-server "smtp.fastmail.com" -- cgit v1.2.3