[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/debbugs 7f40e27 002/311: * debbugs.el (debbugs-send-con
From: |
Stefan Monnier |
Subject: |
[elpa] externals/debbugs 7f40e27 002/311: * debbugs.el (debbugs-send-control-message): Add severity and "done". |
Date: |
Sun, 29 Nov 2020 18:41:28 -0500 (EST) |
branch: externals/debbugs
commit 7f40e27c82e62cbeef6e6e0897038b9767fdeea1
Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
Commit: Lars Magne Ingebrigtsen <larsi@gnus.org>
* debbugs.el (debbugs-send-control-message): Add severity and "done".
---
ChangeLog | 4 ++++
debbugs.el | 21 +++++++++++++++------
2 files changed, 19 insertions(+), 6 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index ebf19a9..c6d7d86 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2011-07-01 Lars Magne Ingebrigtsen <larsi@gnus.org>
+
+ * debbugs.el (debbugs-send-control-message): Add severity and "done".
+
2011-06-30 Lars Magne Ingebrigtsen <larsi@gnus.org>
* debbugs.el (debbugs-emacs): New function and modes for listing
diff --git a/debbugs.el b/debbugs.el
index 32a9e1d..be0e21c 100644
--- a/debbugs.el
+++ b/debbugs.el
@@ -506,11 +506,17 @@ The following commands are available:
nil)
(defun debbugs-send-control-message (message)
- "Send a control message for the current bug report."
+ "Send a control message for the current bug report.
+You can set the severity or add a tag, or close the report. If
+you use the special `done' MESSAGE, the report will be marked as
+fixed, and then closed."
(interactive
- (list (completing-read "Control message: "
- '("important" "normal" "minor" "wishlist"
- "wontfix" "close"))))
+ (list (completing-read
+ "Control message: "
+ '("important" "normal" "minor" "wishlist"
+ "close" "done"
+ "patch" "wontfix" "moreinfo" "unreproducible" "fixed" "notabug")
+ nil t)))
(let* ((subject (mail-header-subject (gnus-summary-article-header)))
(id
(if (string-match "bug#\\([0-9]+\\)" subject)
@@ -524,9 +530,12 @@ The following commands are available:
(cond
((equal message "close")
(format "close %d\n" id))
+ ((equal message "done")
+ (format "tags %d fixed\bclose %d\n" id id))
+ ((member message '("important" "normal" "minor" "wishlist"))
+ (format "severity %d %s\n" id message))
(t
- (format "tags %d %s\n" id message)))
- "thanks\n")
+ (format "tags %d %s\n" id message))))
(funcall send-mail-function))))
(provide 'debbugs)
- [elpa] branch externals/debbugs created (now 528825b), Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 7f40e27 002/311: * debbugs.el (debbugs-send-control-message): Add severity and "done".,
Stefan Monnier <=
- [elpa] externals/debbugs 8e5f30c 004/311: (debbugs-send-control-message): Fix typo in the "done" case., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 629b015 003/311: (debbugs-select-report): Set the minor summary mode in the right buffer., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 4e4e3d0 005/311: (debbugs-emacs): Allow listing archived bugs., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs d548cd0 001/311: Remove version numbers in packages/ directory, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs a0ed26b 009/311: * debbugs.el (debbugs-new, debbugs-handled, debbugs-stale), Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs ab61b0e 010/311: * debbugs-gnu.el (debbugs-emacs): Propertize with 'help-echo., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs aeed946 011/311: * debbugs-gnu.el (debbugs-send-control-message): Prompt for version number for, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs caf94fe 012/311: * debbugs-gnu.el (debbugs-emacs): Change default hits to 500., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 5240eaf 013/311: * debbugs-gnu.el (debbugs-summary-mode): Make sure we don't Cc both bug-gnu-emacs (etc) and debbugs., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 07154a0 006/311: * debbugs.el (debbugs-emacs): Let-bind `debbugs-port' to "gnu.org"., Stefan Monnier, 2020/11/29