return if $pcno < 10 || $pcno > 99;
# dump bad protocol messages
- if ($line =~ /\%[01][0-9A-F]/) {
+ if ($pcno != 29 && $line =~ /\%[01][0-9A-F]/) {
dbg('chan', "CORRUPT protocol message - dumped");
return;
}
}
if ($pcno == 12) { # announces
- unless (is_callsign($field[1]) && is_callsign($field[2]) && is_callsign($field[5])) {
+ unless (is_callsign($field[1]) && is_callsign($field[5])) {
dbg('chan', "Corrupt announce, rejected");
return;
}