mu4e-view: add massage toggle for text filling

For some mis-rendered messages, it can be useful to toggle filling, so add this
as an massage ('M') option.
This commit is contained in:
Dirk-Jan C. Binnema 2021-12-25 11:01:33 +02:00
parent 8704101afc
commit bbf55256e5
1 changed files with 10 additions and 3 deletions

View File

@ -719,6 +719,12 @@ determine which browser function to use."
(not gnus-inhibit-mime-unbuttonizing))
(mu4e-view-refresh))
(defun mu4e-view-toggle-fill-flowed()
"Toggle flowed-message text filling."
(interactive)
(setq mm-fill-flowed (not mm-fill-flowed))
(mu4e-view-refresh))
(defun mu4e~view-gnus-display-mime (msg)
"Like `gnus-display-mime' but include mu4e headers to MSG."
(lambda (&optional ihandles)
@ -1003,9 +1009,10 @@ Based on Gnus' article-mode."
;;; Massaging the message view
(defcustom mu4e-view-massage-options
'( ("ctoggle citations" . gnus-article-hide-citation)
("htoggle headers" . gnus-article-hide-headers)
("ytoggle crypto" . gnus-article-hide-pem)
'( ("ctoggle citations" . gnus-article-hide-citation)
("htoggle headers" . gnus-article-hide-headers)
("ytoggle crypto" . gnus-article-hide-pem)
("ftoggle fill-flowed" . mu4e-view-toggle-fill-flowed)
("mtoggle show all MIME parts" . mu4e-view-toggle-show-mime-parts))
"Various options for 'massaging' the message view. See `(gnus)
Article Treatment' for more options."