From 3f1aca1a80e41bb6e8d7ff30bc45f920f3a82590 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Sun, 6 Sep 2015 20:51:37 +0200 Subject: Message Sequence Match Data: sequence set come before UIDs. Cf. RFC 7162: seq-match-data = "(" known-sequence-set SP known-uid-set ")" --- lib/Net/IMAP/Sync.pm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'lib') diff --git a/lib/Net/IMAP/Sync.pm b/lib/Net/IMAP/Sync.pm index ca85a54..785aa54 100644 --- a/lib/Net/IMAP/Sync.pm +++ b/lib/Net/IMAP/Sync.pm @@ -482,12 +482,12 @@ sub search($$) { } -# $self->select($mailbox, [$UIDs, $seqs]) -# $self->examine($mailbox, [$UIDs, $seqs]) +# $self->select($mailbox, [$seqs, $UIDs]) +# $self->examine($mailbox, [$seqs, $UIDs]) # Issue a SELECT or EXAMINE command for the $mailbox. Upon success, # change the state to SELECTED, otherwise go back to AUTH. -# The optional $UIDs and $seqs are passed are 3rd and 4th arguments to -# the QRESYNC parameter, respectively. +# The optional $seqs and $UIDs are used as Message Sequence Match +# Data for the QRESYNC parameter to the SELECT command. sub select($$;$$) { my $self = shift; my $mailbox = shift; @@ -1278,11 +1278,11 @@ sub _open_mailbox($$) { } -# $self->_select_or_examine($command, $mailbox, [$UIDs, $seqs]) +# $self->_select_or_examine($command, $mailbox, [$seqs, $UIDs]) # Issue a SELECT or EXAMINE command for the $mailbox. Upon success, # change the state to SELECTED, otherwise go back to AUTH. -# The optional $UIDs and $seqs are passed are 3rd and 4th arguments to -# the QRESYNC parameter, respectively. +# The optional $seqs and $UIDs are used as Message Sequence Match +# Data for the QRESYNC parameter to the $command. sub _select_or_examine($$$;$$) { my $self = shift; my $command = shift; -- cgit v1.2.3