diff options
| author | Eric Wong <e@80x24.org> | 2021-06-09 07:47:48 +0000 |
|---|---|---|
| committer | Eric Wong <e@80x24.org> | 2021-06-09 10:03:43 +0000 |
| commit | 9c3009655a0d365154f1119803465afc11713e79 (patch) | |
| tree | 301ebd242db0c72929a454dab5d681c6f9f50ebf /lib/PublicInbox/LeiImport.pm | |
| parent | 7a7034a3264ac99523e661c41fc9ba320a4b3766 (diff) | |
| download | public-inbox-9c3009655a0d365154f1119803465afc11713e79.tar.gz | |
This is a slight behavior change for "lei q": Trashed (but not-yet-expunged) messages no longer get unlinked when --output is used without --augment.
Diffstat (limited to 'lib/PublicInbox/LeiImport.pm')
| -rw-r--r-- | lib/PublicInbox/LeiImport.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lib/PublicInbox/LeiImport.pm b/lib/PublicInbox/LeiImport.pm index b0e7ba6b..cddd5619 100644 --- a/lib/PublicInbox/LeiImport.pm +++ b/lib/PublicInbox/LeiImport.pm @@ -30,11 +30,9 @@ sub input_mbox_cb { # MboxReader callback } sub pmdir_cb { # called via wq_io_do from LeiPmdir->each_mdir_fn - my ($self, $f, @args) = @_; + my ($self, $f, $fl) = @_; my ($folder, $bn) = ($f =~ m!\A(.+?)/(?:new|cur)/([^/]+)\z!) or die "BUG: $f was not from a Maildir?\n"; - my $fl = PublicInbox::MdirReader::maildir_basename_flags($bn); - return if index($fl, 'T') >= 0; # no Trashed messages my $kw = PublicInbox::MdirReader::flags2kw($fl); substr($folder, 0, 0) = 'maildir:'; # add prefix my $lms = $self->{-lms_ro}; |