X-Git-Url: http://scm.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=d9b03a907d1768420574dcb9ffb51e19266cc983;hb=0e84728de35d2dadbb9d624614a471b68ae9eef6;hp=e433fdc48df5a5aa8737c631f6a5e5e392f0fbd5;hpb=9e2fbafcfdab1ee45e581524311f1a97ac41f6ad;p=spider.git diff --git a/perl/DXProt.pm b/perl/DXProt.pm index e433fdc4..d9b03a90 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -720,7 +720,7 @@ sub normal # REBROADCAST!!!! # - if (!$self->{isolate}) { + unless ($self->{isolate}) { broadcast_ak1a($line, $self); # send it to everyone but me } } @@ -743,7 +743,7 @@ sub process if ($t >= $dxchan->pc50_t + $DXProt::pc50_interval) { $dxchan->send(pc50()); $dxchan->pc50_t($t); - } + } } my $key;