diff options
Diffstat (limited to 't')
-rw-r--r-- | t/config.t | 6 | ||||
-rw-r--r-- | t/v2mirror.t | 14 |
2 files changed, 17 insertions, 3 deletions
@@ -220,18 +220,18 @@ EOF { for my $t (qw(TRUE true yes on 1 +1 -1 13 0x1 0x12 0X5)) { - is(PublicInbox::Config::_git_config_bool($t), 1, "$t is true"); + is(PublicInbox::Config::git_bool($t), 1, "$t is true"); is(xqx([qw(git -c), "test.val=$t", qw(config --bool test.val)]), "true\n", "$t matches git-config behavior"); } for my $f (qw(FALSE false no off 0 +0 +000 00 0x00 0X0)) { - is(PublicInbox::Config::_git_config_bool($f), 0, "$f is false"); + is(PublicInbox::Config::git_bool($f), 0, "$f is false"); is(xqx([qw(git -c), "test.val=$f", qw(config --bool test.val)]), "false\n", "$f matches git-config behavior"); } - is(PublicInbox::Config::_git_config_bool('bogus'), undef, + is(PublicInbox::Config::git_bool('bogus'), undef, 'bogus is undef'); } diff --git a/t/v2mirror.t b/t/v2mirror.t index b24528fe..a4ac682d 100644 --- a/t/v2mirror.t +++ b/t/v2mirror.t @@ -4,6 +4,7 @@ use strict; use warnings; use Test::More; use PublicInbox::TestCommon; +use File::Path qw(remove_tree); use Cwd qw(abs_path); require_git(2.6); local $ENV{HOME} = abs_path('t'); @@ -189,6 +190,19 @@ is($mibx->git->check($to_purge), undef, 'unindex+prune successful in mirror'); is(scalar($mset->items), 0, '1@example.com no longer visible in mirror'); } +if ('sequential-shard') { + $mset = $mibx->search->query('m:15@example.com', {mset => 1}); + is(scalar($mset->items), 1, 'large message not indexed'); + remove_tree(glob("$tmpdir/m/xap*"), glob("$tmpdir/m/msgmap.*")); + my $cmd = [ qw(-index -j9 --sequential-shard), "$tmpdir/m" ]; + ok(run_script($cmd), '--sequential-shard works'); + my @shards = glob("$tmpdir/m/xap*/?"); + is(scalar(@shards), 8, 'got expected shard count'); + PublicInbox::InboxWritable::cleanup($mibx); + $mset = $mibx->search->query('m:15@example.com', {mset => 1}); + is(scalar($mset->items), 1, 'search works after --sequential-shard'); +} + if ('max size') { $mime->header_set('Message-ID', '<2big@a>'); my $max = '2k'; |