[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#52825: [PATCH] gnus-article: shr: Let user limit the line-width
From: |
Yaseen Mowzer |
Subject: |
bug#52825: [PATCH] gnus-article: shr: Let user limit the line-width |
Date: |
Mon, 27 Dec 2021 18:28:06 +0200 |
As a user with a wide screen I want to limit the width of lines in
gnus-article buffers so that articles are easier to read. This is
configurable in the 'shr' backend by setting 'shr-width' to an
integer. However, 'mm-shr' forces 'shr-width' to nil (by default) and
'fill-column' (when 'shr-use-fonts' is nil).
* lisp/gnus/mm-decode.el (mm-shr): Let the user configure 'shr-width'
instead of forcing it to nil (by default) or 'fill-column' (when
'shr-use-fonts' is nil).
---
lisp/gnus/mm-decode.el | 5 +----
1 file changed, 1 insertion(+), 4 deletions(-)
diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index aca4bf2062..f3e498016c 100644
--- a/lisp/gnus/mm-decode.el
+++ b/lisp/gnus/mm-decode.el
@@ -1832,10 +1832,7 @@ shr-inhibit-images
(defun mm-shr (handle)
;; Require since we bind its variables.
(require 'shr)
- (let ((shr-width (if shr-use-fonts
- nil
- fill-column))
- (shr-content-function (lambda (id)
+ (let ((shr-content-function (lambda (id)
(let ((handle (mm-get-content-id id)))
(when handle
(mm-with-part handle
--
2.34.1
- bug#52825: [PATCH] gnus-article: shr: Let user limit the line-width,
Yaseen Mowzer <=