mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-05 22:20:24 -08:00
Code Issues Projects Releases Wiki Activity

Use existing X-Debbugs-CC header in erc-bug

Browse source 
* lisp/erc/erc.el (erc-bug): On Emacs 30 and later, search for and
ideally use an existing "X-Debbugs-CC" header instead of inserting a new
one at the top.  Section 4.5 Obsolete Header Fields of RFC 5322 says,
"except for destination address fields (described in section 4.5.3), the
interpretation of multiple occurrences of fields is unspecified."
Anecdotal fiddling suggests the Savannah servers aren't confused by the
second "empty" header field, so this change is probably just cosmetic.
This commit is contained in:
F. Jason Park 2025-08-15 00:10:31 -07:00
parent 5ac0b39bc9
commit 40219c39a1
1 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/erc/erc.el
View file

@ -9372,8 +9372,13 @@ If BUFFER is nil, update the mode line in all ERC buffers."
(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")))
(if (and (>= emacs-major-version 30)
(search-backward "X-Debbugs-CC: " nil t)
(goto-char (pos-eol))
(eq (char-before) ?\s))
(insert "emacs-erc@gnu.org")
(goto-char (point-min))
(insert "X-Debbugs-CC: emacs-erc@gnu.org\n"))))
(defconst erc--news-url
"https://git.savannah.gnu.org/cgit/emacs.git/plain/etc/ERC-NEWS")