From ea60bb902d3677d5c653851c7aa6afbbf710140e Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sun, 24 Oct 2021 15:22:01 +0530
Subject: build-aux: Test bug-guix corpus.

* build-aux/pull-corpus.scm: Pull bug-guix mailing list archives.
* build-aux/test-corpus.scm.in: Test bug-guix corpus.
---
 build-aux/pull-corpus.scm    | 1 +
 build-aux/test-corpus.scm.in | 1 +
 2 files changed, 2 insertions(+)

diff --git a/build-aux/pull-corpus.scm b/build-aux/pull-corpus.scm
index 2305b8e..1242b54 100644
--- a/build-aux/pull-corpus.scm
+++ b/build-aux/pull-corpus.scm
@@ -103,3 +103,4 @@
 
 (pull-mailing-list "guix-commits")
 (pull-mailing-list "guix-patches")
+(pull-mailing-list "bug-guix")
diff --git a/build-aux/test-corpus.scm.in b/build-aux/test-corpus.scm.in
index 2bf7a0a..b069186 100644
--- a/build-aux/test-corpus.scm.in
+++ b/build-aux/test-corpus.scm.in
@@ -96,6 +96,7 @@ parse-email fails to fail directory."
 ;; Test corpora.
 (test-corpus "guix-commits")
 (test-corpus "guix-patches")
+(test-corpus "bug-guix")
 
 ;; If fail directory has any emails, then error out.
 (unless (null? (directory-files %fail-directory))
-- 
cgit v1.2.3