1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00

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).
This commit is contained in:
Lars Ingebrigtsen 2021-12-29 16:48:34 +01:00
parent 0e1a06ac85
commit d9b28ba7c3

View file

@ -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)))