X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdx.pl;h=dd780699b62e6225727aa771f064e448dc1a3ca8;hb=2343a398ca48f31195884e223839dfa0cb1d135f;hp=b80d89bffb0404cafa226c3b059ac424c44ea988;hpb=15424b325766c68bc04207c71dbaf86f06ca5ffa;p=spider.git diff --git a/cmd/dx.pl b/cmd/dx.pl index b80d89bf..dd780699 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,16 @@ 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::send_dx_spot($self, DXProt::pc11($spotter, $freq, $spotted, $line), @spot); + +# my $buf = Spot::formatb($freq, $spotted, $main::systime, $line, $spotter); +# DXProt::broadcast_users("$buf\a\a", 'dx', $spot[0]); # 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); } }