mirror of https://github.com/djcb/mu.git
parent
32d73260d3
commit
d3e7b9cf05
|
@ -560,12 +560,13 @@ appropriate flag at the message forwarded or replied-to."
|
|||
;; appropriate flag at the message forwarded or replied-to.
|
||||
(add-hook 'message-sent-hook
|
||||
(lambda ()
|
||||
(mu4e--set-parent-flags fcc-path)
|
||||
;; we end up with a ((buried) buffer here, visiting
|
||||
;; the fcc-path; not quite sure why. But let's
|
||||
;; get rid of it (#2681)
|
||||
(when-let ((buf (find-buffer-visiting fcc-path)))
|
||||
(kill-buffer buf)))
|
||||
(when fcc-path ;; hmmm... #2688
|
||||
(mu4e--set-parent-flags fcc-path)
|
||||
;; we end up with a ((buried) buffer here, visiting
|
||||
;; the fcc-path; not quite sure why. But let's
|
||||
;; get rid of it (#2681)
|
||||
(when-let ((buf (find-buffer-visiting fcc-path)))
|
||||
(kill-buffer buf))))
|
||||
nil t))))
|
||||
|
||||
;;; Crypto
|
||||
|
|
Loading…
Reference in New Issue