mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-06 11:50:51 -08:00
Code Issues Projects Releases Wiki Activity

Ensure that we get an X-Draft-From headers

Browse source 
* lisp/gnus/gnus-msg.el (gnus-setup-message): Ensure that we get an
X-Draft-From headers (bug#48049).
This commit is contained in:
Adam Sjøgren 2021-04-27 01:17:57 +02:00 • committed by Lars Ingebrigtsen
parent 7f03ee8de1
commit cbd95b9a41
1 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/gnus/gnus-msg.el
View file

@ -415,11 +415,12 @@ only affect the Gcc copy, but not the original message."
gnus-article-reply)))
(,oarticle gnus-article-reply)
(,yanked gnus-article-yanked-articles)
(,group (when gnus-article-reply
(or (nnselect-article-group
(or (car-safe gnus-article-reply)
gnus-article-reply))
gnus-newsgroup-name)))
(,group (if gnus-article-reply
(or (nnselect-article-group
(or (car-safe gnus-article-reply)
gnus-article-reply))
gnus-newsgroup-name)
gnus-newsgroup-name))
(message-header-setup-hook
(copy-sequence message-header-setup-hook))
(mbl mml-buffer-list)