diff options
-rw-r--r-- | gnus.org | 15 |
1 files changed, 9 insertions, 6 deletions
@@ -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 |