From bda1cef129c5b201f7640433ce1844af45a68fcb Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sun, 19 Aug 2001 14:53:00 +0000
Subject: [PATCH] tidy the isolate code up a bit

---
 perl/DXProt.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 7359fdea..2e43068a 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1145,7 +1145,7 @@ sub dx_spot
 		($filter, $hops) = $self->{spotsfilter}->it(@_);
 		return unless $filter;
 	}
-	send_prot_line($self, $filter, $hops, $isolate, $line)
+	send_prot_line($self, $filter, $hops, $isolate, $line);
 }
 
 sub send_prot_line
@@ -1161,7 +1161,7 @@ sub send_prot_line
 		return unless $routeit;
 	}
 	if ($filter) {
-		$self->send($routeit) if $routeit;
+		$self->send($routeit);
 	} else {
 		$self->send($routeit) unless $self->{isolate} || $isolate;
 	}
@@ -1770,10 +1770,10 @@ sub broadcast_route
 	foreach $dxchan (@dxchan) {
 		next if $dxchan == $self;
 		next if $dxchan == $me;
-		if ($dxchan->{routefilter} || (!$self->{isolate} && !$dxchan->{isolate})) {
-			$dxchan->send_route($generate, @_) 
+		if ($dxchan->{routefilter}) {
+			$dxchan->send_route($generate, @_);
 		} else {
-			dbg('DXPROT: isolated') if isdbg('chanerr');
+			$dxchan->send_route($generate, @_) unless $self->{isolate} || $dxchan->{isolate};
 		}
 	}
 }
-- 
2.34.1