Don't use the original message `To` for a reply `To` field

Fixes https://github.com/djcb/mu/issues/2535
This commit is contained in:
Christophe Troestler 2023-08-16 23:03:06 +02:00
parent 6168d776e1
commit 3d0120d024
1 changed files with 2 additions and 4 deletions

View File

@ -350,10 +350,8 @@ address is set, use that, otherwise use the From address. Note,
whatever was in the To: field before, goes to the Cc:-list (if
we're doing a reply-to-all). Special case: if we were the sender
of the original, we simple copy the list form the original."
(let* ((reply-to
(append
(plist-get origmsg :to)
(or (plist-get origmsg :reply-to) (plist-get origmsg :from))))
(let* ((reply-to (or (plist-get origmsg :reply-to)
(plist-get origmsg :from)))
(reply-to (cl-delete-duplicates reply-to
:test #'mu4e~draft-address-cell-equal)))
(if mu4e-compose-dont-reply-to-self