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 " -" "")

Reply via email to