summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDirk-Jan C. Binnema <djcb@djcbsoftware.nl>2021-12-25 11:01:33 +0200
committerDirk-Jan C. Binnema <djcb@djcbsoftware.nl>2021-12-25 11:01:33 +0200
commitbbf55256e58aa62546e8bdade1d127d7e6a9b57e (patch)
treeef42dd2140ae6071c8400d59373cefeda25adef7
parent8704101afce52d8cda6f975a2b723b67afb9cec0 (diff)
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.
-rw-r--r--mu4e/mu4e-view.el13
1 files changed, 10 insertions, 3 deletions
diff --git a/mu4e/mu4e-view.el b/mu4e/mu4e-view.el
index fb36d2e..79d4c49 100644
--- a/mu4e/mu4e-view.el
+++ b/mu4e/mu4e-view.el
@@ -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."