From d9b28ba7c3fa3dc9647aa67ae398ce8b36fb1f4e Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Wed, 29 Dec 2021 16:48:34 +0100 Subject: [PATCH] Allow the user to specify shr-width in mm-shr * lisp/gnus/mm-decode.el (mm-shr): Allow the user to specify the width by setting `shr-width' (bug#52825). --- lisp/gnus/mm-decode.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index d2889a50c0a..e2fb4b66b1b 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el @@ -1869,7 +1869,7 @@ If RECURSIVE, search recursively." ;; Require since we bind its variables. (require 'shr) (let ((shr-width (if shr-use-fonts - nil + shr-width fill-column)) (shr-content-function (lambda (id) (let ((handle (mm-get-content-id id))) -- 2.39.2