Eric Wong <[email protected]> wrote: > Will work on a patch to ensure lei ran successfully.
---------8<-------- Subject: [PATCH] t/lei-mirror: skip lei comparisons if lei missing We can't compare created_at times with lei if lei tests are skipped due to Inline::C or Socket::MsgHdr unavailability. Reported-by: Jörg Rödel <[email protected]> Link: https://public-inbox.org/meta/[email protected]/ --- t/lei-mirror.t | 17 +++++++++++------ 1 file changed, 11 insertions(+), 6 deletions(-) diff --git a/t/lei-mirror.t b/t/lei-mirror.t index 646ff2b19f98..d6fa6db5e3cb 100644 --- a/t/lei-mirror.t +++ b/t/lei-mirror.t @@ -170,12 +170,17 @@ SKIP: { local $ENV{HOME} = $tmpdir; ok(run_script([qw(-index -Lbasic), "$d/t1"]), 'index v1'); ok(run_script([qw(-index -Lbasic), "$d/t2"]), 'index v2'); - my $f = "$d/t1/public-inbox/msgmap.sqlite3"; - my $ca = PublicInbox::Msgmap->new_file($f)->created_at; - is($ca, $created{v1}, 'clone + index v1 synced ->created_at'); - $f = "$d/t2/msgmap.sqlite3"; - $ca = PublicInbox::Msgmap->new_file($f)->created_at; - is($ca, $created{v2}, 'clone + index v1 synced ->created_at'); + + SKIP: { + skip "lei didn't run", 2 if join(sort keys %created) ne 'v1v2'; + my $f = "$d/t1/public-inbox/msgmap.sqlite3"; + my $ca = PublicInbox::Msgmap->new_file($f)->created_at; + is($ca, $created{v1}, 'clone + index v1 synced ->created_at'); + + $f = "$d/t2/msgmap.sqlite3"; + $ca = PublicInbox::Msgmap->new_file($f)->created_at; + is($ca, $created{v2}, 'clone + index v2 synced ->created_at'); + } test_lei(sub { lei_ok qw(inspect num:1 --dir), "$d/t1"; ok(ref(json_utf8->decode($lei_out)), 'inspect num: on v1'); -- unsubscribe: one-click, see List-Unsubscribe header archive: https://public-inbox.org/meta/
