[popfile-commit] engine/Services/IMAP Client.pm,1.5,1.6

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

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

Modified Files:
	Client.pm 
Log Message:
Log errors when connection to server fails.

Index: Client.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Services/IMAP/Client.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** Client.pm	9 Feb 2008 08:51:25 -0000	1.5
--- Client.pm	15 Apr 2008 06:47:39 -0000	1.6
***************
*** 139,143 ****
                                  PeerPort => $port,
                                  Timeout  => $timeout,
!                     );
          }
          else {
--- 139,144 ----
                                  PeerPort => $port,
                                  Timeout  => $timeout,
!                     )
!                     or $self->log_(0, "IO::Socket::SSL error: $@");
          }
          else {
***************
*** 147,151 ****
                                  PeerPort => $port,
                                  Timeout  => $timeout,
!                     );
          }
  
--- 148,153 ----
                                  PeerPort => $port,
                                  Timeout  => $timeout,
!                     )
!                     or $self->log_(0, "IO::Socket::INET error: $@");
          }