Attempt to delete the window after composing a message

This commit is contained in:
Mickey Petersen 2022-12-13 08:32:12 +00:00
parent f3b3a5cf91
commit cb364bc0c5
1 changed files with 4 additions and 1 deletions

View File

@ -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