branch: externals/debbugs
commit ba9a8ca26e1917ed0e953e61cce565dde12877ec
Author: Lars Magne Ingebrigtsen <[email protected]>
Commit: Lars Magne Ingebrigtsen <[email protected]>
(debbugs-gnu-send-control-message): Add donenotabug and donewontfix.
---
ChangeLog | 5 +++++
debbugs-gnu.el | 4 +++-
2 files changed, 8 insertions(+), 1 deletion(-)
diff --git a/ChangeLog b/ChangeLog
index 19f3e61..876f4c8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2011-07-10 Lars Magne Ingebrigtsen <[email protected]>
+
+ * debbugs-gnu.el (debbugs-gnu-send-control-message): Add
+ donenotabug and donewontfix.
+
2011-07-08 Michael Albinus <[email protected]>
* debbugs-gnu.el (debbugs-gnu-*): Rename from `debbugs-*'.
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index fd31611..ded88aa 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -610,7 +610,7 @@ removed instead."
(list (completing-read
"Control message: "
'("important" "normal" "minor" "wishlist"
- "done"
+ "done" "donenotabug" "donewontfix"
"unarchive" "reopen" "close"
"merge" "forcemerge"
"owner" "noowner"
@@ -654,6 +654,8 @@ removed instead."
(format "close %d %s\n" id version))
((equal message "done")
(format "tags %d fixed\nclose %d %s\n" id id version))
+ ((member message '("donenotabug" "donewontfix"))
+ (format "tags %d %s\nclose %d\n" id (substring message 4) id))
((member message '("important" "normal" "minor" "wishlist"))
(format "severity %d %s\n" id message))
(t
