| Subject: | Reader::POP3 |
| Date: | Thu, 09 Jul 2009 16:45:44 +0400 |
| To: | bug-Mail-Abuse [...] rt.cpan.org |
| From: | Max Demyashkin <mdemyashkin [...] comstar-direct.ru> |
Hi,
There's a little bug with reading/deletion of messages in case of
config->{'pop3 delete'} = 1 (config line "pop3 delete: 1"). Message
number is saved (and increased) between sessions, and because of that
messages are read in order 1-3-5.., only every odd email been read and
deleted. Suggested fix:
Mail/Abuse/Reader/Pop3.pm, line 134:
my $msg = $self->msg + 1;
$msg = 1 if $config->{'pop3 delete'}; # if we delete messages from
mailbox, then we need to read and delete message #1 every time
$self->msg($msg);
This worked for me.
---
Max Demyashkin