Platon Technologies
not logged in Login Registration
EnglishSlovak
open source software development celebrating 10 years of open source development! Thursday, March 28, 2024

Diff for sendxmpp/sendxmpp between version 1.16 and 1.17

version 1.16, 2009/01/09 22:29:53 version 1.17, 2009/01/09 22:50:48
Line 16  if 0; # not running under some shell
Line 16  if 0; # not running under some shell
 #  #
 # Released under the terms of the GNU General Public License v2  # Released under the terms of the GNU General Public License v2
 #  #
 # $Platon: sendxmpp/sendxmpp,v 1.15 2008-10-21 21:31:53 rajo Exp $  # $Platon: sendxmpp/sendxmpp,v 1.16 2009-01-09 22:29:53 rajo Exp $
 # $Id$  # $Id$
   
 use Authen::SASL qw(Perl); # authentication broken if Authen::SASL::Cyrus module installed  use Authen::SASL qw(Perl); # authentication broken if Authen::SASL::Cyrus module installed
Line 311  sub xmpp_login ($$$$$$$$) {
Line 311  sub xmpp_login ($$$$$$$$) {
         $arghash->{port} = $port if (!$port);          $arghash->{port} = $port if (!$port);
         if (!$port) {          if (!$port) {
                 @res = $cnx->Connect(%$arghash);                  @res = $cnx->Connect(%$arghash);
                 error_exit ("Could not connect to server '$host': $@") unless @res;                  error_exit ("Could not connect to '$host' on port $port: $@") unless @res;
         } else {          } else {
                 @res = $cnx->Connect(%$arghash);                  @res = $cnx->Connect(%$arghash);
                 error_exit ("Could not connect to '$host' on port $port: $@") unless @res;                  error_exit ("Could not connect to server '$host': $@") unless @res;
         }          }
   
     xmpp_check_result("Connect",\@res,$cnx);      xmpp_check_result("Connect",\@res,$cnx);

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

Platon Group <platon@platon.org> http://platon.org/
Copyright © 2002-2006 Platon Group
Site powered by Metafox CMS
Go to Top