diff options
author | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-04-07 03:41:53 +0000 |
---|---|---|
committer | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-04-07 03:42:29 +0000 |
commit | 3348ad4b3b1a0865ee58a902953165ea0f4aa4bd (patch) | |
tree | fd17dd1b4434cad0dc211c5e890e8c0d5a0d07ce /t/search.t | |
parent | 42c485400522c7c255f6da11391526cb1bc5931b (diff) | |
download | public-inbox-3348ad4b3b1a0865ee58a902953165ea0f4aa4bd.tar.gz |
Since we only query the SQLite over DB for OVER/XOVER; do not need to waste space storing fields To/Cc/:bytes/:lines or the XNUM term. We only use From/Subject/References/Message-ID/:blob in various places of the PSGI code. For reindexing, we will take advantage of docid stability in "xapian-compact --no-renumber" to ensure duplicates do not show up in search results. Since the PSGI interface is the only consumer of Xapian at the moment, it has no need to search based on NNTP article number.
Diffstat (limited to 't/search.t')
-rw-r--r-- | t/search.t | 24 |
1 files changed, 13 insertions, 11 deletions
@@ -306,31 +306,33 @@ sub filter_mids { # names and addresses { - my $res = $ro->query('t:list@example.com'); - is(scalar @$res, 6, 'searched To: successfully'); - foreach my $smsg (@$res) { + my $mset = $ro->query('t:list@example.com', {mset => 1}); + is($mset->size, 6, 'searched To: successfully'); + foreach my $m ($mset->items) { + my $smsg = $ro->lookup_article($m->get_docid); like($smsg->to, qr/\blist\@example\.com\b/, 'to appears'); } - $res = $ro->query('tc:list@example.com'); - is(scalar @$res, 6, 'searched To+Cc: successfully'); - foreach my $smsg (@$res) { + $mset = $ro->query('tc:list@example.com', {mset => 1}); + is($mset->size, 6, 'searched To+Cc: successfully'); + foreach my $m ($mset->items) { + my $smsg = $ro->lookup_article($m->get_docid); my $tocc = join("\n", $smsg->to, $smsg->cc); like($tocc, qr/\blist\@example\.com\b/, 'tocc appears'); } foreach my $pfx ('tcf:', 'c:') { - $res = $ro->query($pfx . 'foo@example.com'); - is(scalar @$res, 1, - "searched $pfx successfully for Cc:"); - foreach my $smsg (@$res) { + my $mset = $ro->query($pfx . 'foo@example.com', { mset => 1 }); + is($mset->items, 1, "searched $pfx successfully for Cc:"); + foreach my $m ($mset->items) { + my $smsg = $ro->lookup_article($m->get_docid); like($smsg->cc, qr/\bfoo\@example\.com\b/, 'cc appears'); } } foreach my $pfx ('', 'tcf:', 'f:') { - $res = $ro->query($pfx . 'Laggy'); + my $res = $ro->query($pfx . 'Laggy'); is(scalar(@$res), 1, "searched $pfx successfully for From:"); foreach my $smsg (@$res) { |