lei convert: support IMAP output and "-F eml" inputs

[public-inbox.git] / xt / net_writer-imap.t

diff --git a/xt/net_writer-imap.t b/xt/net_writer-imap.t
index 64f822cfc7996ab49d20798e196fd38d2079ce42..da43592621f2e08ecfcfa574e2c016e7df67617c 100644 (file)
--- a/xt/net_writer-imap.t
+++ b/xt/net_writer-imap.t
@@ -138,6 +138,10 @@ test_lei(sub {
        $nwr->imap_each($folder_uri, $imap_slurp_all, my $empty = []);
        is(scalar(@$empty), 0, 'no results w/o augment');
 
+       lei_ok qw(convert -F eml t/msg_iter-order.eml -o), $$folder_uri;
+       $nwr->imap_each($folder_uri, $imap_slurp_all, $empty = []);
+       is_deeply($empty, [ [ [], eml_load('t/msg_iter-order.eml') ] ],
+               'converted to IMAP destination');
 });
 
 undef $cleanup; # remove temporary folder