summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
8591535)
Restore the message if the <call> is not routable. However, instead
of the old behaviour of then just stopping dead, it now sends the
message anyway as a broadcast.
my $call = $via || $to;
my $clref = Route::get($call); # try an exact call
my $dxchan = $clref->dxchan if $clref;
my $call = $via || $to;
my $clref = Route::get($call); # try an exact call
my $dxchan = $clref->dxchan if $clref;
-#return (1, $self->msg('e7', $call)) unless $dxchan;
+push @out, $self->msg('e7', $call) unless $dxchan;
}
# convert to PC10 talks where appropriate
}
# convert to PC10 talks where appropriate
- if ($ref) {
- # just go for the "best" one for now (rather than broadcast)
- $dxchan = $ref->dxchan;
+ # just go for the "best" one for now (rather than broadcast)
+ $dxchan = $ref->dxchan;
- # check it...
- if (ref $dxchan && $dxchan->isa('DXChannel')) {
- if ($dxchan->{do_pc9x}) {
- $dxchan->send($line);
- } else {
- $dxchan->talk($from, $to, $via, $text, $onode);
- }
+ # check it...
+ if (ref $dxchan && $dxchan->isa('DXChannel')) {
+ if ($dxchan->{do_pc9x}) {
+ $dxchan->send($line);
- dbg("ERROR: $to -> $dxchan is not a DXChannel! (convert to pc10)");
+ $dxchan->talk($from, $to, $via, $text, $onode);
+ } else {
+ dbg("ERROR: $to -> $dxchan is not a DXChannel! (convert to pc10)");
- # otherwise, drop through and allow it to be broadcast
} elsif ($to eq '*' || $to eq 'SYSOP' || $to eq 'WX') {
# announces
my $sysop = $to eq 'SYSOP' ? '*' : ' ';
} elsif ($to eq '*' || $to eq 'SYSOP' || $to eq 'WX') {
# announces
my $sysop = $to eq 'SYSOP' ? '*' : ' ';
$version = '1.54';
$subversion = '0';
$version = '1.54';
$subversion = '0';