From d8b3b94c40205c64e08402f4a4b272a55c14f80d Mon Sep 17 00:00:00 2001 From: djk Date: Thu, 11 Feb 1999 19:31:56 +0000 Subject: [PATCH] added code to isolate things from rest o network on startup --- Changes | 4 ++++ perl/DXProt.pm | 6 ++++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/Changes b/Changes index 9a06a748..68bd6d15 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,6 @@ +11Feb99======================================================================== +1. Fixed a problem with isolated nodes' configurations being sent on sending +local configs to new connections. 08Feb99======================================================================== 1. added a $SIG{ALRM} in the client to actually catch the alarm when it goes off which means that the netrom/ax25 call programs terminate properly (and not @@ -5,6 +8,7 @@ loop as fast as their little legs can paddle, soaking up CPU time). 2. Implemented read receipts as an especial request from G4PDQ. 3. Fiddled with DXUser a bit to see whether I can stop it core dumping on new users in PC16s on his machine. +4. Added E4 (Palestine) to Prefix data. 30Jan99======================================================================== 1. Some of the dates we get can cause crashes, tried to make it more robust (oh and Y2K compliant) diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 1ffbe701..e1c29843 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -692,8 +692,10 @@ sub send_local_config @nodes = (DXCluster->get_exact($main::mycall)); } else { # create a list of all the nodes that are not connected to this connection - @nodes = DXNode::get_all(); - @nodes = grep { $_->dxchan != $self } @nodes; + # and are not themselves isolated, this to make sure that isolated nodes + # don't appear outside of this node + @nodes = DXNode::get_all(); + @nodes = grep { $_->dxchan != $self && !$_->{isolate} } @nodes; } my @s = $me->pc19(@nodes); -- 2.43.0