X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=b1726e98a1f4ae6ac184374d497f3943c6132f07;hb=d8b9ca222a816c470dfd9455e09b1a861f8624a1;hp=626b3daee4d66e53fcc9fee81900a656bb30f5ed;hpb=33947d79caa1bf12ef34a9ff1c7d027ec1e2a86e;p=spider.git diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm index 626b3dae..b1726e98 100644 --- a/perl/DXProtHandle.pm +++ b/perl/DXProtHandle.pm @@ -1887,6 +1887,12 @@ sub handle_93 return; } + # ignore PC93 coming in from outside this node with a target of local + if ($to eq 'LOCAL' && $self != $main::me) { + dbg("PCPROT: incoming LOCAL chat not from local node, ignored") if isdbg('chanerr'); + return; + } + # if it is routeable then then treat it like a talk my $ref = Route::get($to); if ($ref) { @@ -1934,6 +1940,8 @@ sub handle_93 # chat messages to non-pc9x nodes $self->send_chat(1, pc12($from, $text, undef, $to, undef, $pcall), $from, '*', $text, $to, $pcall, '0'); } + + # broadcast this chat sentence everywhere unless it is targetted to 'LOCAL' $self->broadcast_route_pc9x($pcall, undef, $line, 0) unless $to eq 'LOCAL' || $via eq 'LOCAL'; }