summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAmin Bandali <bandali@gnu.org>2020-09-19 19:34:12 -0400
committerAmin Bandali <bandali@gnu.org>2020-09-19 19:34:12 -0400
commitc49fa11a90f9b17159062e3ab2f4a960f1048ffd (patch)
treea28f8856bbe14543b607d06b6bc1f157808ea4fa
parent7c558c9b5ee7aaf336f643cc6767ec875441a239 (diff)
downloadconfigs-c49fa11a90f9b17159062e3ab2f4a960f1048ffd.tar.gz
configs-c49fa11a90f9b17159062e3ab2f4a960f1048ffd.tar.xz
configs-c49fa11a90f9b17159062e3ab2f4a960f1048ffd.zip
* lisp/bandali-gnus.el: SFL mail setup
-rw-r--r--lisp/bandali-gnus.el25
1 files changed, 20 insertions, 5 deletions
diff --git a/lisp/bandali-gnus.el b/lisp/bandali-gnus.el
index 3759dcf..0c5dc97 100644
--- a/lisp/bandali-gnus.el
+++ b/lisp/bandali-gnus.el
@@ -130,7 +130,11 @@
;; spam
("X-Spam-Flag" "YES" "Junk")
;; catch-all
- "INBOX"))))
+ "INBOX")))
+ (nnimap "sfl"
+ (nnimap-stream tls)
+ (nnimap-address "mail.savoirfairelinux.com")
+ (nnimap-user "amin.bandali")))
gnus-message-archive-group "nnimap+gnu:INBOX"
gnus-parameters
'(("l\\.atreus"
@@ -275,6 +279,7 @@
(subscribed . t))
("nnimap\\+uwaterloo:.*"
(gcc-self . t)))
+ ;; nnimap-record-commands t
gnus-large-newsgroup 50
gnus-home-directory (b/var "gnus/")
gnus-directory (concat gnus-home-directory "news/")
@@ -372,16 +377,20 @@
gnus-thread-sort-by-date)))
(use-package gnus-msg
+ :init
+ (defvar b/sfl-p nil)
:config
(defvar b/shemshak-signature "Amin Bandali
https://shemshak.org/~bandali")
(defvar b/uwaterloo-signature "Amin Bandali, MMath
-Cheriton School of Computer Science
-University of Waterloo
https://bndl.org")
(defvar b/csc-signature "Amin Bandali | https://bndl.org
System Administrator, Systems Committee
Computer Science Club, University of Waterloo")
+ (defvar b/sfl-signature "Amin Bandali
+Free Software Consultant
+Savoir-faire Linux
+GNU Jami: bandali")
(setq gnus-message-replysign t
gnus-posting-styles
'((".*"
@@ -409,9 +418,15 @@ Computer Science Club, University of Waterloo")
("nnimap\\+csc:.*"
(address "bandali@csclub.uwaterloo.ca")
(signature b/csc-signature)
- (gcc "nnimap+csc:Sent"))))
+ (gcc "nnimap+csc:Sent"))
+ ("nnimap\\+sfl:.*"
+ (address "amin.bandali@savoirfairelinux.com")
+ (signature b/sfl-signature)
+ (gcc "nnimap+sfl:Sent")
+ (eval (setq-local b/sfl-p t)))))
:hook (gnus-message-setup . (lambda ()
- (unless (mml-secure-is-encrypted-p)
+ (unless (or (mml-secure-is-encrypted-p)
+ b/sfl-p)
(mml-secure-message-sign)))))
(use-package gnus-topic