brave eww world

1 files changed, 14 insertions, 6 deletions

diff --git a/w3m.org b/w3m.org
index fd6e8da..dc25c98 100644
--- a/w3m.org
+++ b/w3m.org
@@ -169,16 +169,12 @@
       (or (jao-w3m-find-url url)
           (w3m-goto-url-new-session url)))
 
-
-
     (defun jao-w3m-do-browse ()
       "Use the generic browse-url with URL at point."
       (interactive)
       (let ((uri (or (w3m-anchor) (w3m-image) w3m-current-url)))
         (browse-url uri)))
 
-
-
     (defun jao-w3m-download (arg)
       (interactive "P")
       (jao-download (w3m-anchor) arg))
@@ -225,7 +221,7 @@
                                       ".reddit.com"))
   #+end_src
 * Email
-  #+BEGIN_SRC emacs-lisp
+  #+begin_src emacs-lisp
     (defun jao-w3m-gmail-mark-all (unmark)
       (interactive "P")
       (goto-char (point-min))
@@ -245,7 +241,19 @@
           (message-goto-body)
           (insert "\n\n<" (with-current-buffer wb w3m-current-url) ">\n")
           (message-goto-to))))
-  #+END_SRC
+
+    (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)))))
+
+  #+end_src
 * Proxies
   #+BEGIN_SRC emacs-lisp
     (defun jao-w3m-activate-proxy ()