branch: externals/debbugs
commit d854f7ffc884e4c72d4be90edc067f36046ef48a
Author: Felix Lechner <felix.lech...@lease-up.com>
Commit: Michael Albinus <michael.albi...@gmx.de>
Don't hardcode gnu.org as debbugs-port for Gnus interface
* debbugs-gnu.el (debbugs-gnu-get-bugs, debbugs-gnu-usertags):
Don't hardcode gnu.org as debbugs-port for Gnus interface.
Copyright-paperwork-exempt: yes
---
debbugs-gnu.el | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index de6aeebe77..3f5a9aebc8 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -857,8 +857,7 @@ This function assumes the variable `user-mail-address' is
defined."
(defun debbugs-gnu-get-bugs (query)
"Retrieve bug numbers from debbugs.gnu.org according search criteria."
- (let* ((debbugs-port "gnu.org")
- (bugs (assq 'bugs query))
+ (let* ((bugs (assq 'bugs query))
(tags (and (member '(severity . "tagged") query) (assq 'tag query)))
(local-tags (and (member '(severity . "tagged") query) (not tags)))
(phrase (assq 'phrase query))
@@ -2419,7 +2418,6 @@ successfully sent."
debbugs-gnu-default-packages))
(let ((inhibit-read-only t)
- (debbugs-port "gnu.org")
(buffer-name "*Emacs User Tags*")
(user-tab-length
(1+ (apply #'max (length "User") (mapcar #'length users)))))
