diff options
author | Eric Wong <e@80x24.org> | 2024-01-31 10:20:16 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2024-02-01 21:00:14 +0000 |
commit | bfb3de41aae23bb65afc62c228570b4a9578abcc (patch) | |
tree | 7815b0b37c2c89a703f5383fd5a38e19c5eac8a6 /t | |
parent | 82442ae358c8154f4ea05947d39a36cb05ff84bc (diff) | |
download | public-inbox-bfb3de41aae23bb65afc62c228570b4a9578abcc.tar.gz |
LeiToMail can't sort v2 output, but sorting MH input (and NNTP spool + mlmmj archives) numerically makes sense.
Diffstat (limited to 't')
-rw-r--r-- | t/mh_reader.t | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/t/mh_reader.t b/t/mh_reader.t index e8f69fa8..711fc8aa 100644 --- a/t/mh_reader.t +++ b/t/mh_reader.t @@ -101,7 +101,14 @@ test_lei(sub { lei_ok qw(index), 'mh:'.$stale; lei qw(q -f mboxrd), 's:msg 4'; like $lei_out, qr/^Subject: msg 4\nStatus: RO\n\n\n/ms, - "message retrieved after `lei index'" + "message retrieved after `lei index'"; + + # ensure sort works for _input_ when output disallows sort + my $v2out = "$ENV{HOME}/v2-out"; + lei_ok qw(convert -s sequence), "mh:$for_sort", '-o', "v2:$v2out"; + my $git = PublicInbox::Git->new("$v2out/git/0.git"); + chomp(my @l = $git->qx(qw(log --pretty=oneline --format=%s))); + is_xdeeply \@l, [1, 22, 333], 'sequence order preserved for v2'; }); done_testing; |