summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--gnus.org15
1 files changed, 9 insertions, 6 deletions
diff --git a/gnus.org b/gnus.org
index 7b22e37..5a5fefa 100644
--- a/gnus.org
+++ b/gnus.org
@@ -504,15 +504,18 @@
#+BEGIN_SRC emacs-lisp
;; use w3m for html mail
(defun jao-gnus-html-renderer (handle)
- (let ((w3m-message-silent t))
- (condition-case nil
- (mm-inline-text-html-render-with-w3m handle)
- (error (delete-region (point) (point-max))
- (mm-shr handle)))))
+ (let ((w3m-message-silent t)
+ (fill-column (min (window-width) 110)))
+ (mm-shr handle)
+ ;; (condition-case nil
+ ;; (mm-inline-text-html-render-with-w3m handle)
+ ;; (error (delete-region (point) (point-max))
+ ;; (mm-shr handle)))
+ ))
(setq gnus-button-url 'browse-url-generic
gnus-inhibit-images t
- mm-text-html-renderer 'shr ;; 'jao-gnus-html-renderer ;; 'w3m ;; 'shr
+ mm-text-html-renderer 'jao-gnus-html-renderer ;; 'w3m ;; 'shr
shr-use-colors nil
shr-use-fonts nil
mm-w3m-safe-url-regexp nil