From fe5f655526588af1e7048c7ef570072eace383f5 Mon Sep 17 00:00:00 2001
From: minima <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.34.1