Attempt to delete the window after composing a message

2022-12-13 08:32:12 +00:00
parent f3b3a5cf91
commit cb364bc0c5
1 changed files with 4 additions and 1 deletions
--- a/mu4e/mu4e-compose.el
+++ b/mu4e/mu4e-compose.el
@ -673,8 +673,11 @@ appropriate flag at the message forwarded or replied-to."
  "Wrapper around `message-kill-buffer'.
 It restores mu4e window layout after killing the compose-buffer."
  (interactive)
-  (let ((current-buffer (current-buffer)))
+  (let ((current-buffer (current-buffer))
+        (win (selected-window)))
    (message-kill-buffer)
+    (when (window-live-p win)
+      (delete-window win))
    ;; Compose buffer killed
    (when (not (equal current-buffer (current-buffer)))
      ;; Restore mu4e