Merge pull request #1328 from pitti/fix-whitespace-deletion

mu4e: restrict deleting trailing whitespace to region
2020-02-09 00:24:32 +02:00
parent be706fdfdd 4fe4345b88
commit 0d9d99df99
1 changed files with 4 additions and 2 deletions
--- a/mu4e/mu4e-compose.el
+++ b/mu4e/mu4e-compose.el
@ -397,9 +397,11 @@ set, this simply executes `fill-paragraph'."
  (if mu4e-compose-format-flowed
    (let ((fill-column (point-max))
       (use-hard-newlines nil)); rfill "across" hard newlines
-      (delete-trailing-whitespace)
+      (when (use-region-p)
+        (delete-trailing-whitespace (region-beginning) (region-end)))
      (fill-paragraph nil region))
-    (delete-trailing-whitespace)
+    (when (use-region-p)
+      (delete-trailing-whitespace (region-beginning) (region-end)))
    (fill-paragraph nil region)))

 (defun mu4e-toggle-use-hard-newlines ()