branch: externals/debbugs
commit 1ef5eb3ec8709975bb0e6fb2d79ab23fe239d1c4
Author: Lars Magne Ingebrigtsen <[email protected]>
Commit: Lars Magne Ingebrigtsen <[email protected]>
* debbugs-gnu.el (debbugs-gnu-send-control-message): Add "invalid".
---
ChangeLog | 4 ++++
debbugs-gnu.el | 4 ++++
2 files changed, 8 insertions(+)
diff --git a/ChangeLog b/ChangeLog
index d490cab..d3a0d0b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2011-07-16 Lars Magne Ingebrigtsen <[email protected]>
+
+ * debbugs-gnu.el (debbugs-gnu-send-control-message): Add "invalid".
+
2011-07-15 Michael Albinus <[email protected]>
* debbugs-gnu.el (debbugs-gnu-default-severities)
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index ee4740c..07cd96a 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -686,6 +686,7 @@ removed instead."
"unarchive" "reopen" "close"
"merge" "forcemerge"
"owner" "noowner"
+ "invalid"
"patch" "wontfix" "moreinfo" "unreproducible" "fixed" "notabug"
"pending" "help" "security" "confirmed")
nil t)
@@ -733,6 +734,9 @@ removed instead."
((member message '("serious" "important" "normal"
"minor" "wishlist"))
(format "severity %d %s\n" id message))
+ ((equal message "invalid")
+ (format "tags %d notabug\ntags %d wontfix\nclose %d\n"
+ id id id))
(t
(format "tags %d%s %s\n"
id (if reverse " -" "")