lib/PublicInbox/LeiToMail.pm | 3 ++- lib/PublicInbox/MdirReader.pm | 3 ++- diff --git a/lib/PublicInbox/LeiToMail.pm b/lib/PublicInbox/LeiToMail.pm index 95de5e9c1527f7951e2ad7c8c9d37bd0bbef0d35..0364d8efe9aa571d7e16941aac8e0a17712a1fe1 100644 --- a/lib/PublicInbox/LeiToMail.pm +++ b/lib/PublicInbox/LeiToMail.pm @@ -27,8 +27,9 @@ my %kw2char = ( # Maildir characters draft => 'D', flagged => 'F', + forwarded => 'P', # passed answered => 'R', - seen => 'S' + seen => 'S', ); my %kw2status = ( diff --git a/lib/PublicInbox/MdirReader.pm b/lib/PublicInbox/MdirReader.pm index 30e6f8ad6dbc599715694a9dbe5e3989ce164ed4..1685e4d8ee2883f283ef606a478957fd85dc1ab2 100644 --- a/lib/PublicInbox/MdirReader.pm +++ b/lib/PublicInbox/MdirReader.pm @@ -37,7 +37,8 @@ } } } -my %c2kw = ('D' => 'draft', F => 'flagged', R => 'answered', S => 'seen'); +my %c2kw = ('D' => 'draft', F => 'flagged', P => 'forwarded', + R => 'answered', S => 'seen'); sub maildir_each_eml ($$;@) { my ($dir, $cb, @arg) = @_;