From 1aad9482938c6aa1ab3b9c7eb7c1f3151513d974 Mon Sep 17 00:00:00 2001
From: "Dirk-Jan C. Binnema" <djcb@djcbsoftware.nl>
Date: Tue, 9 Apr 2024 20:17:21 +0300
Subject: [PATCH] mu4e-compose: avoid find-file

Use find-file-noselect instead.

Fixes #2644
---
 mu4e/mu4e-compose.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/mu4e/mu4e-compose.el b/mu4e/mu4e-compose.el
index e06af894..df2d1744 100644
--- a/mu4e/mu4e-compose.el
+++ b/mu4e/mu4e-compose.el
@@ -1002,8 +1002,10 @@ must be from current user, as determined through
     (mu4e--compose-setup
      'edit
      (lambda (parent)
-       (find-file (plist-get parent :path))
-       (mu4e--delimit-headers)))))
+       (let ((buf (find-file (plist-get parent :path))))
+         (with-current-buffer buf
+           (mu4e--delimit-headers))
+         buf)))))
 
 ;;;###autoload
 (defun mu4e-compose-resend (address)