[popfile-commit] engine/Services IMAP.pm,1.9.4.14,1.9.4.15

[Manni H. <man...@us...>]

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 {