From e23cd6e357938d0982db094d3e3682e5f66c5f9a Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sun, 11 Jul 2021 22:10:58 +0100
Subject: gnus, notably gnus-refer-thread-use-search

---
 w3m.org | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

(limited to 'w3m.org')

diff --git a/w3m.org b/w3m.org
index ef1b105..da05463 100644
--- a/w3m.org
+++ b/w3m.org
@@ -69,7 +69,18 @@
    #+end_src
 * Email
   #+begin_src emacs-lisp
-    (setq mm-text-html-renderer 'w3m)
+   (defun jao-w3m-gnus-html-renderer (handle)
+     (let ((w3m-message-silent t)
+           (mm-w3m-safe-url-regexp nil)
+           (shr-use-colors nil)
+           (shr-use-fonts nil)
+           (fill-column (min (window-width) 110)))
+       (condition-case nil
+           (mm-inline-text-html-render-with-w3m handle)
+         (error (delete-region (point) (point-max))
+                (mm-shr handle)))))
+
+   (setq mm-text-html-renderer #'jao-w3m-gnus-html-renderer)
   #+end_src
 * Narrowing
   #+begin_src emacs-lisp
-- 
cgit v1.2.3