X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdx.pl;h=bda2979ec83ffefdb927612dea0c3f2f628b3081;hb=refs%2Ftags%2FR_1_26;hp=b80d89bffb0404cafa226c3b059ac424c44ea988;hpb=15424b325766c68bc04207c71dbaf86f06ca5ffa;p=spider.git diff --git a/cmd/dx.pl b/cmd/dx.pl index b80d89bf..bda2979e 100644 --- a/cmd/dx.pl +++ b/cmd/dx.pl @@ -65,7 +65,6 @@ if (!$valid) { } - push @out, $self->msg('dx1', $freq) if !$valid; # check we have a callsign :-) @@ -85,13 +84,14 @@ if (grep $_ eq $spotted, @DXProt::baddx) { my $buf = Spot::formatb($freq, $spotted, $main::systime, $line, $spotter); push @out, $buf; } else { - if (Spot::add($freq, $spotted, $main::systime, $line, $spotter, $main::mycall)) { + my @spot = Spot::add($freq, $spotted, $main::systime, $line, $spotter, $main::mycall); + if (@spot) { # send orf to the users my $buf = Spot::formatb($freq, $spotted, $main::systime, $line, $spotter); - DXProt::broadcast_users($buf, 'dx', $buf); + DXProt::broadcast_users($buf, 'dx', \@spot); # send it orf to the cluster (hang onto your tin helmets) - DXProt::broadcast_ak1a(DXProt::pc11($spotter, $freq, $spotted, $line)); + DXProt::broadcast_all_ak1a(DXProt::pc11($spotter, $freq, $spotted, $line), $DXProt::me); } }