diff options
| author | Adam Sjøgren | 2021-04-27 01:17:57 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-04-27 01:18:07 +0200 |
| commit | cbd95b9a415f814fcc3c36dfd7f52a2dd9679d8e (patch) | |
| tree | c5d160dcb94adc74aab206182badbecc64ba6e66 | |
| parent | 7f03ee8de15df31e57fd86e193901a1cf70cc49d (diff) | |
| download | emacs-cbd95b9a415f814fcc3c36dfd7f52a2dd9679d8e.tar.gz emacs-cbd95b9a415f814fcc3c36dfd7f52a2dd9679d8e.zip | |
Ensure that we get an X-Draft-From headers
* lisp/gnus/gnus-msg.el (gnus-setup-message): Ensure that we get an
X-Draft-From headers (bug#48049).
| -rw-r--r-- | lisp/gnus/gnus-msg.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index f1181d40910..bac987e2f00 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el | |||
| @@ -415,11 +415,12 @@ only affect the Gcc copy, but not the original message." | |||
| 415 | gnus-article-reply))) | 415 | gnus-article-reply))) |
| 416 | (,oarticle gnus-article-reply) | 416 | (,oarticle gnus-article-reply) |
| 417 | (,yanked gnus-article-yanked-articles) | 417 | (,yanked gnus-article-yanked-articles) |
| 418 | (,group (when gnus-article-reply | 418 | (,group (if gnus-article-reply |
| 419 | (or (nnselect-article-group | 419 | (or (nnselect-article-group |
| 420 | (or (car-safe gnus-article-reply) | 420 | (or (car-safe gnus-article-reply) |
| 421 | gnus-article-reply)) | 421 | gnus-article-reply)) |
| 422 | gnus-newsgroup-name))) | 422 | gnus-newsgroup-name) |
| 423 | gnus-newsgroup-name)) | ||
| 423 | (message-header-setup-hook | 424 | (message-header-setup-hook |
| 424 | (copy-sequence message-header-setup-hook)) | 425 | (copy-sequence message-header-setup-hook)) |
| 425 | (mbl mml-buffer-list) | 426 | (mbl mml-buffer-list) |