use ZOOM::Connection error method compatible with 1.16

Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Galen Charlton 2008-03-01 18:31:57 +13:00 committed by Joshua Ferraro
parent 33bc56febd
commit bb40656eb3
1 changed files with 1 additions and 1 deletions

View File

@ -494,7 +494,7 @@ sub Zconn {
my $auth=shift;
my $piggyback=shift;
my $syntax=shift;
if ( defined($context->{"Zconn"}->{$server}) && !$context->{"Zconn"}->{$server}->exception() ) {
if ( defined($context->{"Zconn"}->{$server}) && (0 == $context->{"Zconn"}->{$server}->errcode()) ) {
return $context->{"Zconn"}->{$server};
# No connection object or it died. Create one.
}else {