X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Flei-import-maildir.t;h=1e7eddd571d8388aa5f59d6e5457a000a4301d4d;hb=2f8d15b1170b137a0512a4f3163b236a5dcbf0b8;hp=688b10ce78a0e866ae84b0502712e5db6dd497a7;hpb=ff96ecca608fbb444cce464d74047354585d852d;p=public-inbox.git diff --git a/t/lei-import-maildir.t b/t/lei-import-maildir.t index 688b10ce..1e7eddd5 100644 --- a/t/lei-import-maildir.t +++ b/t/lei-import-maildir.t @@ -28,7 +28,7 @@ test_lei(sub { is(scalar(keys %v), 1, 'inspect handles relative and absolute paths'); my $inspect = json_utf8->decode([ keys %v ]->[0]); is_deeply($inspect, {"maildir:$md" => { 'name.count' => 1 }}, - 'inspect maildir: path had expected output'); + 'inspect maildir: path had expected output') or xbail($inspect); lei_ok(qw(q s:boolean)); my $res = json_utf8->decode($lei_out); @@ -52,7 +52,7 @@ test_lei(sub { my $r2 = json_utf8->decode($lei_out); is_deeply($r2, $res, 'idempotent import') or diag explain($imp_err, $res); - rename("$md/cur/x:2,S", "$md/cur/x:2,SR") or BAIL_OUT "rename: $!"; + rename("$md/cur/x:2,S", "$md/cur/x:2,RS") or BAIL_OUT "rename: $!"; lei_ok('import', "maildir:$md", \'import Maildir after +answered'); lei_ok(qw(q -d none s:boolean), \'lei q after +answered'); $res = json_utf8->decode($lei_out);