[popfile-commit] engine/Services IMAP.pm,1.26,1.27

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

Update of /cvsroot/popfile/engine/Services
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7534/Services

Modified Files:
	IMAP.pm 
Log Message:
First big step toward v2.0 for the IMAP module. The test suite is working, the module is looking good, we just have to adapt the UI tests to the v2.0 templates.

Index: IMAP.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Services/IMAP.pm,v
retrieving revision 1.26
retrieving revision 1.27
diff -C2 -d -r1.26 -r1.27
*** IMAP.pm	29 Jul 2006 19:44:11 -0000	1.26
--- IMAP.pm	1 Dec 2007 23:49:57 -0000	1.27
***************
*** 3,7 ****
--- 3,10 ----
  
  use POPFile::Module;
+ use Services::IMAP::Client;
  @ISA = ("POPFile::Module");
+ use Carp;
+ use Fcntl;
  
  # ----------------------------------------------------------------------------
***************
[...2739 lines suppressed...]
!             else {
!                 $self->log_( 0, "Could not LOGIN." );
!                 $self->{imap_error} = 'NO_LOGIN';
!             }
!         }
!         else {
!             $self->log_( 0, "Could not CONNECT to server." );
!             $self->{imap_error} = 'NO_CONNECT';
!         }
!     }
!     else {
!         $self->log_( 0, 'Could not create IMAP object!' );
!         $self->{imap_error} = 'NO_OBJECT';
!     }
! 
!     return;
  }
  
  
  1;