bug#15939: [PATCH] nndoc.el: Add new debbugs-db nndoc type

[Ivan Shmakov]

        Given that Debbugs is used for Emacs development itself, it
        seems quite appropriate to add Debbugs .log file support to the
        nndoc Gnus’ select method.  Please thus consider the following
        patch.

        An example Debbugs .log file to test the patched nndoc against
        could be retrieved with, say:

$ rsync -t -- \
      rsync://bugs-mirror.debian.org/bts-spool-db/83/688283.log \
      688283.log 

        (Then: G f 688283.log RET in the *Group* buffer.)

--- lisp/gnus/nndoc.el.~1~
+++ lisp/gnus/nndoc.el  2013-11-20 19:58:04.000000000 +0000
@@ -56,6 +56,10 @@ from the document.")
   `((mmdf
      (article-begin .  "^\^A\^A\^A\^A\n")
      (body-end .  "^\^A\^A\^A\^A\n"))
+    (debbugs-db
+     (file-begin    . "^\005")
+     (article-begin . "^[\005\007]\n")
+     (body-end      . "^\003"))
     (mime-digest
      (article-begin . "")
      (head-begin . "^ ?\n")
@@ -460,6 +464,10 @@ from the document.")
   (when (looking-at "\^A\^A\^A\^A$")
     t))
 
+(defun nndoc-debbugs-db-type-p ()
+  (when (looking-at "\006$")
+    t))
+
 (defun nndoc-news-type-p ()
   (when (looking-at "^Path:.*\n")
     t))

-- 
FSF associate member #7257