From: Amin Bandali <bandali@gnu.org>
Date: Thu, 7 Oct 2021 02:49:59 +0000 (-0400)
Subject: Add 'erc-bug' command for reporting ERC bugs
X-Git-Tag: emacs-28.0.90~373
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8865fc02abbf36aaa9801e74d82538336005eded;p=emacs.git

Add 'erc-bug' command for reporting ERC bugs

* etc/ERC-NEWS: Announce the new command, and mention it at the top of
the file along with 'report-emacs-bug'.
* lisp/erc/erc.el (erc-bug): New command for reporting ERC bugs.  It
prompts for a subject, and passes it on to 'report-emacs-bug' along
with the current ERC version, with the ERC mailing list in Cc.
---

diff --git a/etc/ERC-NEWS b/etc/ERC-NEWS
index 49fc07726d5..5a2f30ad8c1 100644
--- a/etc/ERC-NEWS
+++ b/etc/ERC-NEWS
@@ -5,7 +5,7 @@ See the end of the file for license conditions.
 
 Please send ERC bug reports to 'bug-gnu-emacs@gnu.org',
 and Cc the 'emacs-erc@gnu.org' mailing list as well.
-If possible, use 'M-x report-emacs-bug'.
+If possible, use 'M-x erc-bug' or 'M-x report-emacs-bug'.
 
 This file is about changes in ERC, the powerful, modular, and
 extensible IRC (Internet Relay Chat) client distributed with
@@ -157,6 +157,11 @@ a different server than the one the current user is connected to.
 Using the given nick itself instead of the server it is connected to
 is not standardized, but is widely supported across IRC networks.
 
+*** Add 'erc-bug' command for reporting ERC bugs.
+The new 'erc-bug' command prompts for a subject, and passes it on to
+'report-emacs-bug' along with the current ERC version, and adds the
+ERC mailing list in Cc.
+
 
 * Changes in ERC 5.3
 
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index c87238d0b77..c3476384659 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -6620,6 +6620,15 @@ If BUFFER is nil, update the mode line in all ERC buffers."
 
 ;; Miscellaneous
 
+(defun erc-bug (subject)
+  "Send a bug report to the Emacs bug tracker and ERC mailing list."
+  (interactive "sBug Subject: ")
+  (report-emacs-bug
+   (format "ERC %s: %s" erc-version subject))
+  (save-excursion
+    (goto-char (point-min))
+    (insert "X-Debbugs-CC: emacs-erc@gnu.org\n")))
+
 (defun erc-port-to-string (p)
   "Convert port P to a string.
 P may be an integer or a service name."