Update of /cvsroot/popfile/engine/Services
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25319/Services
Modified Files:
Tag: b0_22_2
IMAP.pm
Log Message:
Sanity-check our configuration values and add tests for this.
Index: IMAP.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Services/IMAP.pm,v
retrieving revision 1.9.4.14
retrieving revision 1.9.4.15
diff -C2 -d -r1.9.4.14 -r1.9.4.15
*** IMAP.pm 26 Nov 2007 11:07:37 -0000 1.9.4.14
--- IMAP.pm 30 Nov 2007 21:13:40 -0000 1.9.4.15
***************
*** 535,542 ****
# If we already have a UIDVALIDITY value stored,
# we compare the old and the new value.
-
if ( defined $imap->uid_validity( $folder ) ) {
if ( $imap->check_uidvalidity( $folder, $uidvalidity ) ) {
! # That's the nice case. We simply do nothing.
}
else {
--- 535,546 ----
# If we already have a UIDVALIDITY value stored,
# we compare the old and the new value.
if ( defined $imap->uid_validity( $folder ) ) {
if ( $imap->check_uidvalidity( $folder, $uidvalidity ) ) {
! # That's the nice case.
! # But let's make sure that our UIDNEXT value is also valid
! unless ( defined $imap->uid_next( $folder ) ) {
! $self->log_( 0, "Detected invalid UIDNEXT configuration value for folder $folder. Some new messages might have been skipped." );
! $imap->uid_next( $folder, $uidnext );
! }
}
else {
|
