]> Sergey Matveev's repositories - public-inbox.git/blobdiff - t/lei-import-http.t
www: drop --subject from "git send-email" instructions
[public-inbox.git] / t / lei-import-http.t
index 35cbf3693e4dc8737ab889d82ace111accf1c0f6..d113d47904f15e4f23a606c813e4afe89ea39141 100644 (file)
@@ -2,9 +2,8 @@
 # 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;
-use PublicInbox::Spawn qw(which);
 require_mods(qw(lei -httpd));
-which('curl') or plan skip_all => "curl required for $0";
+require_cmd('curl');
 my ($ro_home, $cfg_path) = setup_public_inboxes;
 my ($tmpdir, $for_destroy) = tmpdir;
 my $sock = tcp_server;
@@ -17,6 +16,7 @@ test_lei({ tmpdir => $tmpdir }, sub {
        my $url = "http://$host_port/t2";
        for my $p (qw(bogus@x/t.mbox.gz bogus@x/raw ?q=noresultever)) {
                ok(!lei('import', "$url/$p"), "/$p fails properly");
+               like($lei_err, qr/curl.*404/, 'got curl 404');
        }
        for my $p (qw(/ /T/ /t/ /t.atom)) {
                ok(!lei('import', "$url/m\@example$p"), "/$p fails");
@@ -39,5 +39,9 @@ test_lei({ tmpdir => $tmpdir }, sub {
        $res = json_utf8->decode($lei_out);
        is($res->[0]->{'m'}, '20180720072141.GA15957@example',
                        'imported search result') or diag explain($res);
+
+       ok(!lei(qw(import --mail-sync), "$url/x\@example.com/raw"),
+               '--mail-sync fails on HTTP');
+       like($lei_err, qr/--mail-sync/, 'error message notes --mail-sync');
 });
 done_testing;