X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Faltid.t;h=6c34cdd65bbddcdd7b22722159c00541be2419b1;hb=95bdac7f09c69036efed537a4d03d5bdd2ae4eb6;hp=13a44a3b53221dcb1baacb63bd07dc0be69a823b;hpb=6e6f7999361925e4c944f308df4bc32a1842cd69;p=public-inbox.git diff --git a/t/altid.t b/t/altid.t index 13a44a3b..6c34cdd6 100644 --- a/t/altid.t +++ b/t/altid.t @@ -1,22 +1,19 @@ -# Copyright (C) 2016-2018 all contributors +# Copyright (C) 2016-2020 all contributors # License: AGPL-3.0+ use strict; use warnings; use Test::More; -use File::Temp qw/tempdir/; -foreach my $mod (qw(DBD::SQLite Search::Xapian)) { - eval "require $mod"; - plan skip_all => "$mod missing for altid.t" if $@; -} - +use PublicInbox::TestCommon; +require_mods(qw(DBD::SQLite Search::Xapian)); use_ok 'PublicInbox::Msgmap'; use_ok 'PublicInbox::SearchIdx'; use_ok 'PublicInbox::Import'; use_ok 'PublicInbox::Inbox'; -my $tmpdir = tempdir('pi-altid-XXXXXX', TMPDIR => 1, CLEANUP => 1); +my ($tmpdir, $for_destroy) = tmpdir(); my $git_dir = "$tmpdir/a.git"; my $alt_file = "$tmpdir/another-nntp.sqlite3"; my $altid = [ "serial:gmane:file=$alt_file" ]; +my $ibx; { my $mm = PublicInbox::Msgmap->new_file($alt_file, 1); @@ -42,14 +39,14 @@ my $altid = [ "serial:gmane:file=$alt_file" ]; $im->done; } { - my $ibx = PublicInbox::Inbox->new({mainrepo => $git_dir}); + $ibx = PublicInbox::Inbox->new({inboxdir => $git_dir}); $ibx->{altid} = $altid; my $rw = PublicInbox::SearchIdx->new($ibx, 1); $rw->index_sync; } { - my $ro = PublicInbox::Search->new($git_dir, $altid); + my $ro = PublicInbox::Search->new($ibx); my $msgs = $ro->query("gmane:1234"); is_deeply([map { $_->mid } @$msgs], ['a@example.com'], 'got one match');