X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;ds=sidebyside;f=lisp%2Fnndoc.el;fp=lisp%2Fnndoc.el;h=69ac2e8fad8843f77d3e3fa8e6d98576493335d4;hb=852d65fb565743a193d30838cc8e5dde64bbbb3c;hp=b17a7a6ecd8ed5e84d88f106e74e3b99c40cb874;hpb=a35f25ab6b239d72a4d082cb72679b6777637b4e;p=gnus diff --git a/lisp/nndoc.el b/lisp/nndoc.el index b17a7a6ec..69ac2e8fa 100644 --- a/lisp/nndoc.el +++ b/lisp/nndoc.el @@ -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))