emacs: add binding for guix-patches debbugs

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 55ca4cd..f2c5bff 100644 (file)
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -1943,19 +1943,24 @@ This function is intended for use with `ivy-ignore-buffers'."
    ("C-c D b" . debbugs-gnu-bugs)
    ("C-c D e" .
     (lambda ()
    ("C-c D b" . debbugs-gnu-bugs)
    ("C-c D e" .
     (lambda ()

-      (interactive)
+      (interactive)                     ; bug-gnu-emacs

       (setq debbugs-gnu-current-suppress t)
       (debbugs-gnu debbugs-gnu-default-severities '("emacs"))))
       (setq debbugs-gnu-current-suppress t)
       (debbugs-gnu debbugs-gnu-default-severities '("emacs"))))

-   ("C-c D g" .
+   ("C-c D g" .                         ; bug-gnuzilla

     (lambda ()
       (interactive)
       (setq debbugs-gnu-current-suppress t)
       (debbugs-gnu debbugs-gnu-default-severities '("gnuzilla"))))
     (lambda ()
       (interactive)
       (setq debbugs-gnu-current-suppress t)
       (debbugs-gnu debbugs-gnu-default-severities '("gnuzilla"))))

-   ("C-c D G" .
+   ("C-c D G b" .                       ; bug-guix
+    (lambda ()
+      (interactive)
+      (setq debbugs-gnu-current-suppress t)
+      (debbugs-gnu debbugs-gnu-default-severities '("guix"))))
+   ("C-c D G p" .                       ; guix-patches

     (lambda ()
       (interactive)
       (setq debbugs-gnu-current-suppress t)
     (lambda ()
       (interactive)
       (setq debbugs-gnu-current-suppress t)

-      (debbugs-gnu debbugs-gnu-default-severities '("guix"))))))
+      (debbugs-gnu debbugs-gnu-default-severities '("guix-patches"))))))

 
 (use-package org-ref
   :init
 
 (use-package org-ref
   :init