init.el

@@ -1871,8 +1871,7 @@
             ;; Automatically scan for new news
             (gnus-demon-add-handler 'db/gnus-demon-scan-news-on-level-2 5 5)
 
-            ;; Automatically expire groups on idle
-            (gnus-demon-add-handler 'gnus-group-expire-all-groups 10 5)
+            (add-hook 'gnus-started-hook #'gnus-demon-init)
 
             ;; Visit group under point and immediately close it; this updates
             ;; gnus’ registry as a side-effect

site-lisp/db-utils.el

@@ -460,8 +460,7 @@ Does not replace CRLF with CRCRLF, and so on."
   (interactive "f")
   (unless (file-readable-p file)
     (user-error "Cannot read file: %s" file))
-  (shr-render-buffer (find-file-noselect file))
-  (delete-trailing-whitespace))
+  (shr-render-buffer (find-file-noselect file)))
 
 
 ;; Base45 Decoding