master e701214 2/2: Fix the patch tagging in submit-emacs-patch

[Lars Ingebrigtsen]

branch: master
commit e7012148c0d0e0b0aa87add75ed1e1c6f7eb4d32
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix the patch tagging in submit-emacs-patch
    
    * lisp/mail/emacsbug.el (submit-emacs-patch): Put the tags in the
    debbugs pseudo-headers because X-Debbugs-Tags is not a thing that
    exists.
---
 lisp/mail/emacsbug.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index 36d1dc7..e48c254 100644
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -514,9 +514,13 @@ Message buffer where you can explain more about the patch."
   (insert "\n\n\n")
   (emacs-bug--system-description)
   (mml-attach-file file "text/patch" nil "attachment")
-  (message-add-header "X-Debbugs-Tags: patch")
   (message-goto-body)
   (message "Write a description of the patch and use `C-c C-c' to send it")
+  (add-hook 'message-send-hook
+            (lambda ()
+              (message-goto-body)
+              (insert "Tags: patch\nthanks\n\n"))
+            t)
   (message-add-action
    (lambda ()
      ;; Bury the help buffer (if it's shown).