procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Handle https url for debbugs mbox (Bug#28831)

Browse source 
In 2017-09-13 "Prefer HTTPS to FTP and HTTP in documentation",
gnus-bug-group-download-format-alist was updated to use https for the
debbugs.gnu.org mbox links, but gnus-read-ephemeral-bug-group assumed
http links.
* lisp/gnus/gnus-group.el (gnus-read-ephemeral-bug-group): Use
url-parse functions to get the host name, instead of ad-hoc regexps.
This commit is contained in:
Noam Postavsky 2017-10-19 20:07:05 -04:00
parent 9e4265ef91
commit b060e091c3
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/gnus/gnus-group.el
View file

@ -2467,9 +2467,7 @@ the bug number, and browsing the URL must return mbox output."
;; Add the debbugs address so that we can respond to reports easily.
(let ((address
(format "%s@%s" (car ids)
(replace-regexp-in-string
"/.*$" ""
(replace-regexp-in-string "^http://" "" mbox-url)))))
(url-host (url-generic-parse-url mbox-url)))))
(goto-char (point-min))
(while (re-search-forward (concat "^" message-unix-mail-delimiter)
nil t)