X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=2c94dcc1cb619571baef325fe4607071c453bb1c;hb=e674587476599456cce169e02b0e441d985f9dd8;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; }