From fe5f655526588af1e7048c7ef570072eace383f5 Mon Sep 17 00:00:00 2001 From: minima Date: Sun, 14 Jan 2007 20:54:36 +0000 Subject: [PATCH] don't route pc92 back to their origin --- perl/DXProt.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 98f95033..c00219ec 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -1228,8 +1228,8 @@ sub broadcast_route_pc9x $line =~ /\^H(\d+)\^\~?$/; unless ($1 > 0 && $self->{isolate}) { foreach $dxchan (@dxchan) { - next if $dxchan == $self; - next if $dxchan == $main::me; + next if $dxchan == $self || $main::me; + next if $origin eq $dxchan->{call}; # don't route some from this call back again. next unless $dxchan->{do_pc92}; next unless $dxchan->isa('DXProt'); -- 2.43.0