]> Sergey Matveev's repositories - public-inbox.git/blobdiff - t/lei-import-imap.t
lei inspect: use LeiMailSync->match_imap_url
[public-inbox.git] / t / lei-import-imap.t
index d424ebb1f9815411900ba39f8a94005373c859aa..d3935c828514c4895cc4f511419b10be88e7758b 100644 (file)
@@ -22,9 +22,15 @@ test_lei({ tmpdir => $tmpdir }, sub {
        is_deeply(json_utf8->decode($lei_out), {}, 'no inspect stats, yet');
 
        lei_ok('import', $url);
+       lei_ok('inspect', $url);
+       my $res = json_utf8->decode($lei_out);
+       is(scalar keys %$res, 1, 'got one key in inspect URL');
+       my $re = qr!\Aimap://;AUTH=ANONYMOUS\@\Q$host_port\E
+                       /t\.v2\.0;UIDVALIDITY=\d+!x;
+       like((keys %$res)[0], qr/$re\z/, 'got expanded key');
+
        lei_ok 'ls-mail-sync';
-       like($lei_out, qr!\Aimap://;AUTH=ANONYMOUS\@\Q$host_port\E
-                       /t\.v2\.0;UIDVALIDITY=\d+\n\z!x, 'ls-mail-sync');
+       like($lei_out, qr!$re\n\z!, 'ls-mail-sync');
        chomp(my $u = $lei_out);
        lei_ok('import', $u, \'UIDVALIDITY match in URL');
        $url = $u;