projects
/
~bandali
/
configs
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Update 2 drones
[~bandali/configs]
/
lisp
/
bandali-gnus.el
diff --git
a/lisp/bandali-gnus.el
b/lisp/bandali-gnus.el
index
de01c0f
..
88b05bd
100644
(file)
--- a/
lisp/bandali-gnus.el
+++ b/
lisp/bandali-gnus.el
@@
-58,7
+58,7
@@
(nnimap-address "127.0.0.1")
(nnimap-server-port 143)
(nnimap-authenticator plain)
(nnimap-address "127.0.0.1")
(nnimap-server-port 143)
(nnimap-authenticator plain)
- (nnimap-user "
amin
@shemshak.local"))
+ (nnimap-user "
bandali
@shemshak.local"))
(nnimap "gnu"
(nnimap-stream plain)
(nnimap-address "127.0.0.1")
(nnimap "gnu"
(nnimap-stream plain)
(nnimap-address "127.0.0.1")
@@
-76,6
+76,8
@@
(list ".*<\\(.*\\)\\.gnus\\.org>.*" "l.\\1")
;; libreplanet
(list ".*<\\(.*\\)\\.libreplanet\\.org>.*" "l.\\1")
(list ".*<\\(.*\\)\\.gnus\\.org>.*" "l.\\1")
;; libreplanet
(list ".*<\\(.*\\)\\.libreplanet\\.org>.*" "l.\\1")
+ ;; iana (e.g. tz-announce)
+ (list ".*<\\(.*\\)\\.iana\\.org>.*" "l.\\1")
;; *.lists.sr.ht, omitting one dot if present
;; add more \\.?\\([^.]*\\) if needed
(list ".*<~\\(.*\\)/\\([^.]*\\)\\.?\\([^.]*\\)\\.lists.sr.ht>.*" "l.~\\1.\\2\\3")
;; *.lists.sr.ht, omitting one dot if present
;; add more \\.?\\([^.]*\\) if needed
(list ".*<~\\(.*\\)/\\([^.]*\\)\\.?\\([^.]*\\)\\.lists.sr.ht>.*" "l.~\\1.\\2\\3")
@@
-91,14
+93,16
@@
;; ----------------------------------
;; legend: (u)nsubscribed | (d)ead
;; ----------------------------------
;; ----------------------------------
;; legend: (u)nsubscribed | (d)ead
;; ----------------------------------
+ ;; spam
+ ("X-Spam_action" "reject" "Junk")
;; otherwise, leave mail in INBOX
"INBOX")))
;; otherwise, leave mail in INBOX
"INBOX")))
- (nnimap "uw"
+ (nnimap "uw
aterloo
"
(nnimap-stream plain)
(nnimap-address "127.0.0.1")
(nnimap-server-port 143)
(nnimap-authenticator plain)
(nnimap-stream plain)
(nnimap-address "127.0.0.1")
(nnimap-server-port 143)
(nnimap-authenticator plain)
- (nnimap-user "abandali@uw.local")
+ (nnimap-user "abandali@uw
aterloo
.local")
(nnimap-inbox "INBOX")
(nnimap-split-methods 'nnimap-split-fancy)
(nnimap-split-fancy (|
(nnimap-inbox "INBOX")
(nnimap-split-methods 'nnimap-split-fancy)
(nnimap-split-fancy (|
@@
-113,7
+117,16
@@
(nnimap-address "127.0.0.1")
(nnimap-server-port 143)
(nnimap-authenticator plain)
(nnimap-address "127.0.0.1")
(nnimap-server-port 143)
(nnimap-authenticator plain)
- (nnimap-user "abandali@csc.uw.local")))
+ (nnimap-user "abandali@csclub.uwaterloo.local")
+ (nnimap-inbox "INBOX")
+ (nnimap-split-methods 'nnimap-split-fancy)
+ (nnimap-split-fancy (|
+ ;; cron reports and other messages from root
+ (from "root@\\(.*\\.\\)?csclub\\.uwaterloo\\.ca" "INBOX")
+ ;; spam
+ ("X-Spam-Flag" "YES" "Junk")
+ ;; catch-all
+ "INBOX"))))
gnus-message-archive-group "nnimap+gnu:INBOX"
gnus-parameters
'(("l\\.atreus"
gnus-message-archive-group "nnimap+gnu:INBOX"
gnus-parameters
'(("l\\.atreus"
@@
-250,7
+263,7
@@
(gcc-self . t))
("l\\."
(subscribed . t))
(gcc-self . t))
("l\\."
(subscribed . t))
- ("nnimap\\+uw:.*"
+ ("nnimap\\+uw
aterloo
:.*"
(gcc-self . t)))
gnus-large-newsgroup 50
gnus-home-directory (b/var "gnus/")
(gcc-self . t)))
gnus-large-newsgroup 50
gnus-home-directory (b/var "gnus/")
@@
-269,6
+282,12
@@
'(list . "list-id\\|list-post\\|x-mailing-list\\|x-beenthere\\|x-loop")
t)))
'(list . "list-id\\|list-post\\|x-mailing-list\\|x-beenthere\\|x-loop")
t)))
+ ;; (require 'gnus-registry)
+ ;; (setq gnus-registry-max-entries 2500)
+ ;; (setq gnus-registry-ignored-groups
+ ;; (append gnus-registry-ignored-groups
+ ;; '(("^nnimap:gnu\\.l" t)
+ ;; ("webmasters$" t))))
;; (gnus-registry-initialize)
(with-eval-after-load 'recentf
;; (gnus-registry-initialize)
(with-eval-after-load 'recentf
@@
-299,6
+318,8
@@
"^Resent-From:"
"^User-Agent:"
"^X-detected-operating-system:"
"^Resent-From:"
"^User-Agent:"
"^X-detected-operating-system:"
+ "^X-Spam_action:"
+ "^X-Spam_bar:"
"^Message-ID:"
;; "^References:"
"^List-Id:"
"^Message-ID:"
;; "^References:"
"^List-Id:"
@@
-343,15
+364,14
@@
(use-package gnus-msg
:config
(defvar b/shemshak-signature "Amin Bandali
(use-package gnus-msg
:config
(defvar b/shemshak-signature "Amin Bandali
-https://shemshak.org/~
amin
")
- (defvar b/uw
-signature "Amin Bandali, MMath Student
+https://shemshak.org/~
bandali
")
+ (defvar b/uw
aterloo-signature "Amin Bandali, MMath
Cheriton School of Computer Science
University of Waterloo
Cheriton School of Computer Science
University of Waterloo
-https://b
andali.eu
.org")
- (defvar b/csc-signature "Amin Bandali
+https://b
ndl
.org")
+ (defvar b/csc-signature "Amin Bandali
| https://bndl.org
System Administrator, Systems Committee
System Administrator, Systems Committee
-Computer Science Club, University of Waterloo
-https://csclub.uwaterloo.ca/~abandali")
+Computer Science Club, University of Waterloo")
(setq gnus-message-replysign t
gnus-posting-styles
'((".*"
(setq gnus-message-replysign t
gnus-posting-styles
'((".*"
@@
-370,12
+390,12
@@
https://csclub.uwaterloo.ca/~abandali")
(signature b/shemshak-signature)
(gcc "nnimap+shemshak:Sent")
(eval (setq b/message-cite-say-hi t)))
(signature b/shemshak-signature)
(gcc "nnimap+shemshak:Sent")
(eval (setq b/message-cite-say-hi t)))
- ("nnimap\\+uw:.*"
+ ("nnimap\\+uw
aterloo
:.*"
(address "bandali@uwaterloo.ca")
(body "\nBest,\n")
(address "bandali@uwaterloo.ca")
(body "\nBest,\n")
- (signature b/uw-signature))
- ("nnimap\\+uw:INBOX"
- (gcc "\"nnimap+uw:Sent Items\""))
+ (signature b/uw
aterloo
-signature))
+ ("nnimap\\+uw
aterloo
:INBOX"
+ (gcc "\"nnimap+uw
aterloo
:Sent Items\""))
("nnimap\\+csc:.*"
(address "bandali@csclub.uwaterloo.ca")
(signature b/csc-signature)
("nnimap\\+csc:.*"
(address "bandali@csclub.uwaterloo.ca")
(signature b/csc-signature)
projects / ~bandali / configs / blobdiff