--- google/lib/CWMP/Session.pm	2007/06/22 15:54:43	83
+++ google/lib/CWMP/Session.pm	2007/06/22 18:25:24	84
@@ -47,6 +47,8 @@
 
 	confess "need sock" unless $self->sock;
 
+	$self->debug( 0 ) unless $self->debug;
+
 	warn "created ", __PACKAGE__, "(", dump( @_ ), ") for ", $self->sock->peerhost, "\n" if $self->debug;
 
 	$self->store( CWMP::Store->new({
@@ -72,7 +74,7 @@
 
 	my $sock = $self->sock || die "no sock?";
 
-	die "not IO::Socket::INET but ", ref( $sock ) unless ( ref($sock) eq 'IO::Socket::INET' );
+	die "not IO::Socket::INET but ", ref( $sock ) unless ( ref($sock) eq 'Net::Server::Proto::TCP' );
 
 	if ( ! $sock->connected ) {
 		warn "SOCKET NOT CONNECTED\n";