Revert "Don't tag Gnus bugs with "gnus""

This reverts commit b6fa58072304c2a24f1fe8a0e06a4739a7f8211b.

The debbugs syntax requires a package name

diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el
index a193ab41348593d31e6cf6e4fbee03c92d2622e9..85969edc81b22820ce01f3f6706c37b6ea840981 100644 (file)
--- a/lisp/gnus/gnus-msg.el
+++ b/lisp/gnus/gnus-msg.el
@@ -1535,7 +1535,11 @@ If YANK is non-nil, include the original article."
       (message-pop-to-buffer "*Gnus Bug*"))
     (let ((message-this-is-mail t))
       (message-setup `((To . ,gnus-maintainer)
-                       (Subject . ""))))
+                       (Subject . "")
+                       (X-Debbugs-Package
+                        . ,(format "%s" gnus-bug-package))
+                       (X-Debbugs-Version
+                        . ,(format "%s" (gnus-continuum-version))))))
     (when gnus-bug-create-help-buffer
       (push `(gnus-bug-kill-buffer) message-send-actions))
     (goto-char (point-min))

diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index bbf85fe584ac6198e6017cc9c3d331313949fc58..ef6bd89c36e7c360ab67d18e2b5ed68aff6253cc 100644 (file)
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -2654,6 +2654,10 @@ such as a mark that says whether an article is stored in the cache
   "submit@debbugs.gnu.org (The Gnus Bugfixing Girls + Boys)"
   "The mail address of the Gnus maintainers.")
 
+(defconst gnus-bug-package
+  "gnus"
+  "The package to use in the bug submission.")
+
 (defvar gnus-info-nodes
   '((gnus-group-mode "(gnus)Group Buffer")
     (gnus-summary-mode "(gnus)Summary Buffer")