From: minima <minima>
Date: Sun, 19 Aug 2001 14:53:00 +0000 (+0000)
Subject: tidy the isolate code up a bit
X-Git-Tag: R_1_48~91
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=bda1cef129c5b201f7640433ce1844af45a68fcb;p=spider.git

tidy the isolate code up a bit
---

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};
 		}
 	}
 }