X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=2c94dcc1cb619571baef325fe4607071c453bb1c;hb=958cc95d51be017e52ec888f9b8629d2c61cbcc2;hp=bf9aecef411624cdceb339a09e69fc6e83bfdcdf;hpb=0a35942621158fae0bca29f3c70c63a97fc4e691;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index bf9aecef..2c94dcc1 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -159,7 +159,7 @@ sub rec if ($user->lockout) { Log('DXCommand', "$call is locked out, disconnected"); $conn->send_now("Z$call|bye"); # this will cause 'client' to disconnect - $conn->disconect; + $conn->disconnect; return; }