X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Flei-import.t;fp=t%2Flei-import.t;h=fa4fc5045d4d3783676b41e0c73d9f8ec7a4daf4;hb=df7e9afebf0c583640773efac01583aa9a1fa2d6;hp=46747a911657fb7e7f8ab34423b33c78b75f9d71;hpb=2ee341027929f716636aa7f03057a961d3a02d1c;p=public-inbox.git

diff --git a/t/lei-import.t b/t/lei-import.t
index 46747a91..fa4fc504 100644
--- a/t/lei-import.t
+++ b/t/lei-import.t
@@ -13,6 +13,19 @@ lei_ok([qw(import -f eml -)], undef, { %$lei_opt, 0 => $fh },
 	\'import single file from stdin') or diag $lei_err;
 close $fh;
 lei_ok(qw(q s:boolean), \'search hit after import');
+lei_ok(qw(q s:boolean -f mboxrd), \'blob accessible after import');
+{
+	my $expect = [ eml_load('t/data/0001.patch') ];
+	require PublicInbox::MboxReader;
+	my @cmp;
+	open my $fh, '<', \$lei_out or BAIL_OUT "open :scalar: $!";
+	PublicInbox::MboxReader->mboxrd($fh, sub {
+		my ($eml) = @_;
+		$eml->header_set('Status');
+		push @cmp, $eml;
+	});
+	is_deeply(\@cmp, $expect, 'got expected message in mboxrd');
+}
 lei_ok(qw(import -f eml), 't/data/message_embed.eml',
 	\'import single file by path');