X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=xt%2Fnet_writer-imap.t;fp=xt%2Fnet_writer-imap.t;h=333e0e3b7ee0a7de2eb5c6617fb7eba50bed5ba9;hp=afa4bcc3e8817bcd31f0c88ebe18378b0b41fbc3;hb=3c187b8751beecf97da596692384cd2bf4d91d5b;hpb=958da0ebc2ac4b017f68a47561efd9d33d2a81bc

diff --git a/xt/net_writer-imap.t b/xt/net_writer-imap.t
index afa4bcc3..333e0e3b 100644
--- a/xt/net_writer-imap.t
+++ b/xt/net_writer-imap.t
@@ -137,6 +137,13 @@ test_lei(sub {
 	is_deeply($res->[0]->[1], $plack_qp_eml,
 			'lei q wrote expected result');
 
+	my $mdir = "$ENV{HOME}/t.mdir";
+	lei_ok 'convert', $folder_url, '-o', $mdir;
+	my @mdfiles = glob("$mdir/*/*");
+	is(scalar(@mdfiles), 1, '1 message from IMAP => Maildir conversion');
+	is_deeply(eml_load($mdfiles[0]), $plack_qp_eml,
+		'conversion from IMAP to Maildir');
+
 	lei_ok qw(q f:matz -a -o), $folder_url;
 	$nwr->imap_each($folder_uri, $imap_slurp_all, my $aug = []);
 	is(scalar(@$aug), 2, '2 results after augment') or diag explain($aug);