diff options
Diffstat (limited to '.emacs.d/lisp/bandali-gnus.el')
| -rw-r--r-- | .emacs.d/lisp/bandali-gnus.el | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/.emacs.d/lisp/bandali-gnus.el b/.emacs.d/lisp/bandali-gnus.el index 58fca3a..febf30f 100644 --- a/.emacs.d/lisp/bandali-gnus.el +++ b/.emacs.d/lisp/bandali-gnus.el @@ -49,6 +49,13 @@ `(,@(cond ((string= (system-name) "langa") '((nnimap + "kelar" + (nnimap-stream plain) + (nnimap-address "127.0.0.1") + (nnimap-server-port 143) + (nnimap-authenticator plain) + (nnimap-user "bandali@kelar.local")) + (nnimap "shemshak" (nnimap-stream plain) (nnimap-address "127.0.0.1") @@ -74,12 +81,20 @@ (from ".+-\\(owner\\|bounces\\)@\\(non\\)?gnu\\.org" "listmod") ;; gnu (list ".*<\\(.*\\)\\.\\(non\\)?gnu\\.org>.*" "l.\\1") + ;; fsf + (list ".*<\\(.*\\)\\.fsf\\.org>.*" "l.\\1") ;; gnus (list ".*<\\(.*\\)\\.gnus\\.org>.*" "l.\\1") ;; libreplanet (list ".*<\\(.*\\)\\.libreplanet\\.org>.*" "l.\\1") ;; iana (e.g. tz-announce) (list ".*<\\(.*\\)\\.iana\\.org>.*" "l.\\1") + ;; mailop + (list ".*<\\(.*\\)\\.mailop\\.org>.*" "l.\\1") + ;; sdlu + (list ".*<\\(.*\\)\\.spammers\\.dontlike\\.us>.*" "l.sdlu") + ;; bitfolk + (from ".*@\\(.+\\)?bitfolk\\.com>.*" "bitfolk") ;; haskell (list ".*<\\(.*\\)\\.haskell\\.org>.*" "l.\\1") ;; *.lists.sr.ht, omitting one dot if present @@ -298,6 +313,12 @@ jami:bandali") (to "webmasters-comment@gnu.org") (body "") (eval (setq b/message-cite-say-hi nil))) + ("nnimap\\+kelar:.*" + (address "bandali@kelar.org") + ("X-Message-SMTP-Method" "smtp mail.kelar.org 587") + (body "\nBest,\n") + (gcc "nnimap+kelar:Sent") + (eval (setq b/message-cite-say-hi t))) ("nnimap\\+shemshak:.*" (address "amin@shemshak.org") ("X-Message-SMTP-Method" "smtp mail.shemshak.org 587") @@ -343,6 +364,7 @@ jami:bandali") ((string= (system-name) "langa") '((("csc" visible nil nil)) (("uwaterloo" visible nil nil)) + (("kelar" visible nil nil)) (("shemshak" visible nil nil)) (("gnu" visible nil nil)) (("old-gnu" visible nil nil)))))))) |