about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2016-06-18 22:23:52 +0000
committerEric Wong <e@80x24.org>2016-06-18 22:23:52 +0000
commitbf963d16a434f3aa9fe903e1299ac86852ecd3c6 (patch)
treed249afede5811913b5091c9c2cbf0898074ba535 /t
parentf7db02b9aec08b37e08893e6e96c07725a0c1620 (diff)
downloadpublic-inbox-bf963d16a434f3aa9fe903e1299ac86852ecd3c6.tar.gz
This should be portable despite the intended use of this
directory being non-portable.
Diffstat (limited to 't')
-rw-r--r--t/watch_maildir.t39
1 files changed, 39 insertions, 0 deletions
diff --git a/t/watch_maildir.t b/t/watch_maildir.t
new file mode 100644
index 00000000..6564a866
--- /dev/null
+++ b/t/watch_maildir.t
@@ -0,0 +1,39 @@
+# Copyright (C) 2016 all contributors <meta@public-inbox.org>
+# License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
+use Test::More;
+use File::Temp qw/tempdir/;
+use Email::MIME;
+use PublicInbox::Config;
+
+my $tmpdir = tempdir('watch_maildir-XXXXXX', TMPDIR => 1, CLEANUP => 1);
+my $git_dir = "$tmpdir/test.git";
+my $maildir = "$tmpdir/md";
+use_ok 'PublicInbox::WatchMaildir';
+use_ok 'PublicInbox::Emergency';
+my $cfgpfx = "publicinbox.test";
+my $addr = 'test-public@example.com';
+is(system(qw(git init -q --bare), $git_dir), 0, 'initialized git dir');
+
+my $msg = <<EOF;
+From: user\@example.com
+To: $addr
+Subject: spam
+Message-Id: <a\@b.com>
+Date: Sat, 18 Jun 2016 00:00:00 +0000
+
+msg
+EOF
+PublicInbox::Emergency->new($maildir)->prepare(\$msg);
+
+my $config = PublicInbox::Config->new({
+        "$cfgpfx.address" => $addr,
+        "$cfgpfx.mainrepo" => $git_dir,
+        "$cfgpfx.watch" => "maildir:$maildir",
+});
+
+PublicInbox::WatchMaildir->new($config)->scan;
+my $git = PublicInbox::Git->new($git_dir);
+my @list = $git->qx(qw(rev-list refs/heads/master));
+is(scalar @list, 1, 'one revision in rev-list');
+
+done_testing;