diff options
author | Guilhem Moulin <guilhem@fripost.org> | 2017-05-29 18:04:19 +0200 |
---|---|---|
committer | Guilhem Moulin <guilhem@fripost.org> | 2017-05-29 18:04:19 +0200 |
commit | 6fca0d67e7a657452de154e74ad02bf3657db5a1 (patch) | |
tree | 0badec4e7af70802c52d7db16f8a0265519a47dc | |
parent | 329738ebb74815d8a49feee63efb23d9baa557ee (diff) |
Ensure the lower bound of UID ranges is at least 1.
-rw-r--r-- | Changelog | 1 | ||||
-rw-r--r-- | lib/Net/IMAP/InterIMAP.pm | 2 |
2 files changed, 2 insertions, 1 deletions
@@ -3,6 +3,7 @@ interimap (0.4) UNRELEASED * pullimap: replace non RFC 5321-compliant envelope sender addresses (received by the IMAP FETCH ENVELOPE command) by the null sender address <>. + - Ensure the lower bound of UID ranges is at least 1. -- Guilhem Moulin <guilhem@guilhem.org> Tue, 06 Dec 2016 17:37:01 +0100 diff --git a/lib/Net/IMAP/InterIMAP.pm b/lib/Net/IMAP/InterIMAP.pm index 7a1ba34..6f148b7 100644 --- a/lib/Net/IMAP/InterIMAP.pm +++ b/lib/Net/IMAP/InterIMAP.pm @@ -1185,7 +1185,7 @@ sub pull_new_messages($$&@) { do { my $range = ''; my $first; - my $since = $self->{_PCACHE}->{$mailbox}->{UIDNEXT} // 1; + my $since = $self->{_PCACHE}->{$mailbox}->{UIDNEXT} || 1; foreach my $uid (@ignore) { if ($since < $uid) { $first //= $since; |