summaryrefslogtreecommitdiffhomepage
path: root/gnus.org
diff options
context:
space:
mode:
Diffstat (limited to 'gnus.org')
-rw-r--r--gnus.org10
1 files changed, 5 insertions, 5 deletions
diff --git a/gnus.org b/gnus.org
index 7ab954e..5337bdc 100644
--- a/gnus.org
+++ b/gnus.org
@@ -409,9 +409,9 @@
(gcc-self . t)
(auto-expire . t)
(total-expire . t)
- (expiry-wait . 365)
+ (expiry-wait . 14)
(jao-gnus--trash-group "nnimap:trash")
- (expiry-target . delete))
+ (expiry-target . "nnimap:trove/bigml"))
("^nnimap:bigml/support"
(posting-style (address "support@bigml.com")))
(,jao-gnus-expirable
@@ -614,12 +614,12 @@
gnus-visible-headers
(concat
gnus-visible-headers
- "\\|^X-Newsreader:\\|^X-Mailer:\\|User-Agent:\\|X-User-Agent:")))
+ "\\|^List-[iI][Dd]:\\|^X-Newsreader:\\|^X-Mailer:\\|User-Agent:\\|X-User-Agent:")))
#+end_src
*** HTML email
#+BEGIN_SRC emacs-lisp
(setq gnus-button-url 'browse-url-generic
- gnus-inhibit-images nil
+ gnus-inhibit-images t
mm-discouraged-alternatives nil ;; '("text/html" "text/richtext")
mm-inline-large-images 'resize)
@@ -634,7 +634,7 @@
(when (re-search-forward "^\\(To\\|Subject\\):" nil t)
(beginning-of-line)
(let ((shr-width 1000))
- (shr-render-region begin (- (point) 1))))))))
+ (shr-render-region begin (1- (point)))))))))
(add-hook 'gnus-part-display-hook 'jao-gnus-remove-anchors)