From f6709bbb39a61ccf6cd47b30c3f8c995f4e91fdd Mon Sep 17 00:00:00 2001
From: Lucien Cartier-Tilet <lucien@phundrak.com>
Date: Sun, 7 Nov 2021 17:52:04 +0100
Subject: [PATCH] [Emacs] Better mu4e-view-mode behavior

---
 org/config/emacs.org | 20 +++++++++++---------
 1 file changed, 11 insertions(+), 9 deletions(-)

diff --git a/org/config/emacs.org b/org/config/emacs.org
index 2ad3f49..46dafbf 100644
--- a/org/config/emacs.org
+++ b/org/config/emacs.org
@@ -1305,15 +1305,17 @@ configuration for the ~mu4e~ package itself.
   :straight (:build t :location site)
   :commands mu4e mu4e-compose-new
   :init
-  (progn
-    (setq mu4e-completing-read-function 'completing-read
-          mu4e-use-fancy-chars          t
-          mu4e-view-show-images         t
-          message-kill-buffer-on-exit   t
-          mu4e-org-support              nil)
-    (let ((dir "~/Downloads/mu4e"))
-      (when (file-directory-p dir)
-        (setq mu4e-attachment-dir dir))))
+  (setq mu4e-completing-read-function 'completing-read
+        mu4e-use-fancy-chars          t
+        mu4e-view-show-images         t
+        message-kill-buffer-on-exit   t
+        mu4e-org-support              nil)
+  (let ((dir "~/Downloads/mu4e"))
+    (when (file-directory-p dir)
+      (setq mu4e-attachment-dir dir)))
+  (defmacro mu4e-view-mode--prepare ()
+    `(lambda () (visual-line-mode 1)))
+  :gfhook ('mu4e-view-mode-hook (mu4e-view-mode--prepare))
   :general
   <<mu4e-keybindings-undef>>
   <<mu4e-keybindings-view>>