- $line =~ s/\^//og; # remove any ^ characters
- my $prot = DXProt::pc10($from, $to, $via, $line);
- DXProt::route($via?$via:$to, $prot);
- Log('talk', $to, $from, $via?$via:$main::mycall, $line);
+ $line =~ s/\^//og; # remove any ^ characters
+ my $prot = DXProt::pc10($from, $to, $via, $line);
+ DXProt::route($via?$via:$to, $prot);
+ Log('talk', $to, $from, $via?$via:$main::mycall, $line);