From: Amin Bandali Date: Sun, 3 Nov 2019 14:40:22 +0000 (-0500) Subject: emacs: gnus: update visible headers and simplify message ids X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/e1f6f6a2e9eb4de7890b6ee4e2d1c1096ce0bffe?hp=3466a6a7455352b093fde2d92d9d641592712a85 emacs: gnus: update visible headers and simplify message ids --- diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 571448e..b7be16a 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -2282,13 +2282,34 @@ This function is intended for use with `ivy-ignore-buffers'." :config (setq gnus-buttonized-mime-types '("multipart/\\(signed\\|encrypted\\)") - gnus-visible-headers - (concat gnus-visible-headers "\\|^List-Id:\\|^X-RT-Originator:\\|^User-Agent:") - gnus-sorted-header-list - '("^From:" "^Subject:" "^Summary:" "^Keywords:" - "^Followup-To:" "^To:" "^Cc:" "X-RT-Originator" - "^Newsgroups:" "List-Id:" "^Organization:" - "^User-Agent:" "^Date:") + gnus-sorted-header-list '("^From:" + "^X-RT-Originator" + "^Newsgroups:" + "^Subject:" + "^Date:" + "^Envelope-To:" + "^Followup-To:" + "^Reply-To:" + "^Organization:" + "^Summary:" + "^Abstract:" + "^Keywords:" + "^To:" + "^[BGF]?Cc:" + "^Posted-To:" + "^Mail-Copies-To:" + "^Mail-Followup-To:" + "^Apparently-To:" + "^Resent-From:" + "^User-Agent:" + "^X-detected-operating-system:" + "^Message-ID:" + "^References:" + "^List-Id:" + "^Gnus-Warning:") + gnus-visible-headers (mapconcat 'identity + gnus-sorted-header-list + "\\|") ;; local-lapsed article dates ;; from https://www.emacswiki.org/emacs/GnusFormatting#toc11 gnus-article-date-headers '(user-defined) @@ -2343,8 +2364,7 @@ https://csclub.uwaterloo.ca/~abandali") gnus-posting-styles '((".*" (address "bandali@gnu.org") - (signature b/gnu-signature) - (eval (set (make-local-variable 'message-user-fqdn) "fencepost.gnu.org"))) + (signature b/gnu-signature)) ("nnimap\\+gnu:l\\..*" (signature nil)) ((header "subject" "ThankCRM")