Update of /cvsroot/popfile/engine/Proxy
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24834
Modified Files:
Proxy.pm
Log Message:
Add more logging when connecting to server
Index: Proxy.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/Proxy.pm,v
retrieving revision 1.64
retrieving revision 1.65
diff -C2 -d -r1.64 -r1.65
*** Proxy.pm 20 Feb 2006 02:14:29 -0000 1.64
--- Proxy.pm 16 Nov 2006 19:12:51 -0000 1.65
***************
*** 533,536 ****
--- 533,539 ----
ConnectAddr => $hostname,
ConnectPort => $port ); # PROFILE BLOCK STOP
+ $self->log_( 0, "Attempting to connect to socks server at "
+ . $self->config_( 'socks_server' ) . ":"
+ . ProxyPort => $self->config_( 'socks_port' ) );
} else {
if ( $ssl ) {
***************
*** 540,548 ****
PeerAddr => $hostname,
PeerPort => $port ); # PROFILE BLOCK STOP
! } else {
$mail = IO::Socket::INET->new( # PROFILE BLOCK START
Proto => "tcp",
PeerAddr => $hostname,
PeerPort => $port ); # PROFILE BLOCK STOP
}
}
--- 543,556 ----
PeerAddr => $hostname,
PeerPort => $port ); # PROFILE BLOCK STOP
! $self->log_( 0, "Attempting to connect to SSL server at "
! . "$hostname:$port" );
!
! } else {
$mail = IO::Socket::INET->new( # PROFILE BLOCK START
Proto => "tcp",
PeerAddr => $hostname,
PeerPort => $port ); # PROFILE BLOCK STOP
+ $self->log_( 0, "Attempting to connect to POP server at "
+ . "$hostname:$port" );
}
}
|
