@inqueue = (); # the main input queue, an array of hashes
$systime = 0; # the time now (in seconds)
-$version = "1.12"; # the version no of the software
+$version = "1.13"; # the version no of the software
$starttime = 0; # the starting time of the cluster
# handle disconnections
# the user MAY have an SSID if local, but otherwise doesn't
- my $user = DXUser->get($call);
+ $user = DXUser->get($call);
if (!defined $user) {
$user = DXUser->new($call);
} else {
{
my $dxchan;
foreach $dxchan (DXChannel->get_all()) {
- disconnect($dxchan);
+ disconnect($dxchan) unless $dxchan == $DXProt::me;
}
Log('cluster', "DXSpider V$version stopped");
exit(0);