emacs
/
mu
mirror of https://github.com/djcb/mu.git
1
0
Fork 0
Code Issues Releases Wiki Activity

mu4e-compose: be less eager deleting frames 

We were deleting frames if it was not the last one; however, emacs can
have a bunch of hidden frames (for tooltips?) that we should not
consider.
This commit is contained in:
Dirk-Jan C. Binnema 2023-12-14 08:32:06 +02:00
parent 25776da557
commit 65e7e7f42d
1 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
mu4e/mu4e-compose.el
View File

@ -586,8 +586,8 @@ buffers; lets remap its faces so it uses the ones for mu4e."
(delete-region (point-min) (point-max))))
(defun mu4e--decoded-message (msg &optional headers-only)
"Get the headers part of message MSG, decoded as a string.
This is used only to extract header information."
"Get the message MSG, decoded as a string.
With HEADERS-ONLY non-nil, only include the headers part."
(with-temp-buffer
(setq-local gnus-article-decode-hook
'(article-decode-charset
@ -750,8 +750,14 @@ Is this address yours?"
(defun mu4e--maybe-delete-frame ()
"Delete frame if there are multiple and current one has a single window."
(when (and (one-window-p) (> (length (frame-list)) 1))
(delete-frame)))
;; Only consider _real_ frames with some size
(when (one-window-p)
(let ((real-frames
(seq-filter (lambda (frame)
(> (or (frame-parameter frame 'width) 0) 0))
(frame-list))))
(when (> (length real-frames) 1)
(delete-frame)))))
(defun mu4e--compose-setup (compose-type compose-func &optional switch)
"Set up a new buffer for mu4e message composition.