From 3c187b8751beecf97da596692384cd2bf4d91d5b Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Thu, 28 Oct 2021 11:14:54 +0000 Subject: [PATCH] xt/net_writer_imap: test "lei convert" w/ IMAP source I just did a double-take and nearly thought authentication was broken while reading LeiConvert.pm. Add a comment in LeiConvert.pm to clarify things, too. --- lib/PublicInbox/LeiConvert.pm | 1 + xt/net_writer-imap.t | 7 +++++++ 2 files changed, 8 insertions(+) diff --git a/lib/PublicInbox/LeiConvert.pm b/lib/PublicInbox/LeiConvert.pm index 68fc7c0b..424eab8e 100644 --- a/lib/PublicInbox/LeiConvert.pm +++ b/lib/PublicInbox/LeiConvert.pm @@ -55,6 +55,7 @@ sub lei_convert { # the main "lei convert" method my $devfd = $lei->path_to_fd($ovv->{dst}) // return; $lei->{opt}->{augment} = 1 if $devfd < 0; $self->prepare_inputs($lei, \@inputs) or return; + # n.b. {net} {auth} is handled by l2m worker my ($op_c, $ops) = $lei->workers_start($self, 1); $lei->{wq1} = $self; $self->wq_io_do('process_inputs', []); 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); -- 2.44.0