* 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.
(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).