Diff for sendxmpp/sendxmpp between version 1.2 and 1.3
version 1.2, 2006/10/04 21:33:13 |
version 1.3, 2006/10/04 22:05:12 |
Line 246 sub xmpp_login ($$$$$$$) { |
|
Line 246 sub xmpp_login ($$$$$$$) { |
|
unless ($cnx); |
unless ($cnx); |
|
|
my @res; |
my @res; |
if (!$port) { |
if (!$port) { |
@res = $cnx->Connect(hostname=>$host,tls=>$tls); |
@res = $cnx->Connect(hostname => $host, tls => $tls); |
} else { |
error_exit ("Could not connect to server '$host': $@") unless @res; |
@res = $cnx->Connect(hostname=>$host,port=>$port,tls=>$tls); |
} else { |
} |
@res = $cnx->Connect(hostname => $host, port => $port, tls => $tls); |
|
error_exit ("Could not connect to '$host' on port $port: $@") unless @res; |
|
} |
|
|
xmpp_check_result("Connect",\@res,$cnx); |
xmpp_check_result("Connect",\@res,$cnx); |
|
|
Platon Group <platon@platon.org> http://platon.org/
|
|