my $addr = $self->hostname || '127.0.0.1';
+$addr = $main::localhost_alias_ipv6 if $addr eq '::1' && $main::localhost_alias_ipv6;
+$addr = $main::localhost_alias_ipv4 if $addr =~ /^127\./ && $main::localhost_alias_ipv4;
+
Log('cmd', "$self->{call}|$addr|dx|$line");
my @bad;
if ($DXProt::baddx->in($spotted)) {
$localonly++;
}
-if ($DXProt::badspotter->in($spotternoid)) {
+if ($DXProt::badspotter->in($spotternoid) || $self->badip) {
LogDbg('DXCommand', "badspotter $spotternoid as $spotter ($oline) from $addr");
$localonly++;
}
} else {
# send orf to the users
$ipaddr ||= $main::mycall; # emergency backstop
- my $spot = DXProt::pc61($spotter, $freq, $spotted, $line, $ipaddr);
+ my $spot = DXProt::pc61($spotter, $freq, $spotted, unpad($line), $ipaddr);
$self->dx_spot(undef, undef, @spot);
if ($self->isslugged) {