diff options
author | Eric Wong <e@80x24.org> | 2021-03-28 00:17:25 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-03-28 02:43:54 +0000 |
commit | 29792d70a5d8305f68521664a7fa2e0fe54ff291 (patch) | |
tree | 441c0aafeef6cf9639360308371846cdaf003528 /t | |
parent | ba6f3d8379fb9ee8d0f18e3e0d6d77386daf79c9 (diff) | |
download | public-inbox-29792d70a5d8305f68521664a7fa2e0fe54ff291.tar.gz |
This makes it easier to manage test dependencies on systems where optional stuff isn't installed. This fixes some lei tests which didn't check for Plack before starting -httpd, and ensures Parse::RecDescent is available for -imapd in case Mail::IMAPClient stops using it.
Diffstat (limited to 't')
-rw-r--r-- | t/altid_v2.t | 2 | ||||
-rw-r--r-- | t/imap.t | 5 | ||||
-rw-r--r-- | t/imap_searchqp.t | 5 | ||||
-rw-r--r-- | t/imapd-tls.t | 3 | ||||
-rw-r--r-- | t/imapd.t | 3 | ||||
-rw-r--r-- | t/init.t | 2 | ||||
-rw-r--r-- | t/lei-convert.t | 3 | ||||
-rw-r--r-- | t/lei-import-imap.t | 3 | ||||
-rw-r--r-- | t/lei-mirror.t | 3 | ||||
-rw-r--r-- | t/lei-q-remote-import.t | 3 | ||||
-rw-r--r-- | t/net_reader-imap.t | 2 |
11 files changed, 13 insertions, 21 deletions
diff --git a/t/altid_v2.t b/t/altid_v2.t index 493982a1..47ebec85 100644 --- a/t/altid_v2.t +++ b/t/altid_v2.t @@ -5,9 +5,9 @@ use strict; use v5.10.1; use PublicInbox::TestCommon; use PublicInbox::Eml; -use PublicInbox::Msgmap; require_git(2.6); require_mods(qw(DBD::SQLite Search::Xapian)); +require PublicInbox::Msgmap; my $another = 'another-nntp.sqlite3'; my $altid = [ "serial:gmane:file=$another" ]; my $ibx = create_inbox 'v2', version => 2, indexlevel => 'medium', @@ -3,11 +3,10 @@ # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> # unit tests (no network) for IMAP, see t/imapd.t for end-to-end tests use strict; -use Test::More; +use v5.10.1; use PublicInbox::TestCommon; require_git 2.6; -require_mods(qw(DBD::SQLite Email::Address::XS||Mail::Address - Parse::RecDescent)); +require_mods(qw(-imapd)); require_ok 'PublicInbox::IMAP'; require_ok 'PublicInbox::IMAPD'; diff --git a/t/imap_searchqp.t b/t/imap_searchqp.t index 6b4121ea..e2f49e5a 100644 --- a/t/imap_searchqp.t +++ b/t/imap_searchqp.t @@ -2,11 +2,10 @@ # Copyright (C) 2020-2021 all contributors <meta@public-inbox.org> # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> use strict; -use Test::More; +use v5.10.1; use Time::Local qw(timegm); use PublicInbox::TestCommon; -require_mods(qw(DBD::SQLite Email::Address::XS||Mail::Address - Parse::RecDescent)); +require_mods(qw(-imapd)); use_ok 'PublicInbox::IMAPsearchqp'; use_ok 'PublicInbox::IMAP'; diff --git a/t/imapd-tls.t b/t/imapd-tls.t index 125846e2..72ba8769 100644 --- a/t/imapd-tls.t +++ b/t/imapd-tls.t @@ -6,8 +6,7 @@ use Test::More; use Socket qw(IPPROTO_TCP SOL_SOCKET); use PublicInbox::TestCommon; # IO::Poll is part of the standard library, but distros may split it off... -require_mods(qw(DBD::SQLite IO::Socket::SSL Mail::IMAPClient IO::Poll - Email::Address::XS||Mail::Address Parse::RecDescent)); +require_mods(qw(-imapd IO::Socket::SSL Mail::IMAPClient IO::Poll)); my $imap_client = 'Mail::IMAPClient'; $imap_client->can('starttls') or plan skip_all => 'Mail::IMAPClient does not support TLS'; @@ -8,8 +8,7 @@ use Time::HiRes (); use PublicInbox::TestCommon; use PublicInbox::Config; use PublicInbox::Spawn qw(which); -require_mods(qw(DBD::SQLite Mail::IMAPClient Mail::IMAPClient::BodyStructure - Email::Address::XS||Mail::Address Parse::RecDescent)); +require_mods(qw(-imapd Mail::IMAPClient)); my $imap_client = 'Mail::IMAPClient'; my $can_compress = $imap_client->can('compress'); if ($can_compress) { # hope this gets fixed upstream, soon @@ -74,7 +74,7 @@ sub quiet_fail { } SKIP: { - require_mods(qw(DBD::SQLite Search::Xapian::WritableDatabase), 2); + require_mods(qw(DBD::SQLite Search::Xapian), 2); require_git(2.6, 1) or skip "git 2.6+ required", 2; use_ok 'PublicInbox::Msgmap'; local $ENV{PI_DIR} = "$tmpdir/.public-inbox/"; diff --git a/t/lei-convert.t b/t/lei-convert.t index 9b430d8e..7ff628f9 100644 --- a/t/lei-convert.t +++ b/t/lei-convert.t @@ -6,8 +6,7 @@ use PublicInbox::MboxReader; use PublicInbox::MdirReader; use PublicInbox::NetReader; use PublicInbox::Eml; -require_git 2.6; -require_mods(qw(DBD::SQLite Search::Xapian Mail::IMAPClient Net::NNTP)); +require_mods(qw(lei -imapd -nntpd Mail::IMAPClient Net::NNTP)); my ($tmpdir, $for_destroy) = tmpdir; my $sock = tcp_server; my $cmd = [ '-imapd', '-W0', "--stdout=$tmpdir/i1", "--stderr=$tmpdir/i2" ]; diff --git a/t/lei-import-imap.t b/t/lei-import-imap.t index 15a355ab..fd38037a 100644 --- a/t/lei-import-imap.t +++ b/t/lei-import-imap.t @@ -2,8 +2,7 @@ # Copyright (C) 2021 all contributors <meta@public-inbox.org> # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> use strict; use v5.10.1; use PublicInbox::TestCommon; -require_git 2.6; -require_mods(qw(DBD::SQLite Search::Xapian Mail::IMAPClient)); +require_mods(qw(lei -imapd Mail::IMAPClient)); my ($ro_home, $cfg_path) = setup_public_inboxes; my ($tmpdir, $for_destroy) = tmpdir; my $sock = tcp_server; diff --git a/t/lei-mirror.t b/t/lei-mirror.t index 6039e568..5ab18b6d 100644 --- a/t/lei-mirror.t +++ b/t/lei-mirror.t @@ -2,8 +2,7 @@ # Copyright (C) 2020-2021 all contributors <meta@public-inbox.org> # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> use strict; use v5.10.1; use PublicInbox::TestCommon; -require_git 2.6; -require_mods(qw(DBD::SQLite Search::Xapian)); +require_mods(qw(-httpd lei)); my $sock = tcp_server(); my ($tmpdir, $for_destroy) = tmpdir(); my $http = 'http://'.tcp_host_port($sock); diff --git a/t/lei-q-remote-import.t b/t/lei-q-remote-import.t index 93828a24..32c5172b 100644 --- a/t/lei-q-remote-import.t +++ b/t/lei-q-remote-import.t @@ -2,8 +2,7 @@ # Copyright (C) 2021 all contributors <meta@public-inbox.org> # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> use strict; use v5.10.1; use PublicInbox::TestCommon; -require_git 2.6; -require_mods(qw(json DBD::SQLite Search::Xapian)); +require_mods(qw(lei -httpd)); use PublicInbox::MboxReader; my ($ro_home, $cfg_path) = setup_public_inboxes; my $sock = tcp_server; diff --git a/t/net_reader-imap.t b/t/net_reader-imap.t index adcd6931..e478ee07 100644 --- a/t/net_reader-imap.t +++ b/t/net_reader-imap.t @@ -3,7 +3,7 @@ # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt> use strict; use v5.10.1; use PublicInbox::TestCommon; require_git 2.6; -require_mods(qw(DBD::SQLite Search::Xapian Mail::IMAPClient)); +require_mods(qw(-imapd Search::Xapian Mail::IMAPClient)); use PublicInbox::Config; my ($tmpdir, $for_destroy) = tmpdir; my ($ro_home, $cfg_path) = setup_public_inboxes; |