From: Dirk Koopman <djk@tobit.co.uk>
Date: Wed, 25 Jul 2007 11:45:44 +0000 (+0100)
Subject: shutdown quicker by not manipulating routing table
X-Git-Tag: 1.55~87
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=85915352f85d7fbb42bee4cf8f6a684c62b96dc9;p=spider.git

shutdown quicker by not manipulating routing table
---

diff --git a/Changes b/Changes
index 7b64449c..e921235e 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,5 @@
+25Jul07=======================================================================
+1. don't clear out routing tables on shutdown. This should speed that up.
 24Jul07=======================================================================
 1. Try to target PC93 (the combined talk/ann/chat sentence) better. Prevent
 PC12 chat going to non-dxspider and non-ak1a nodes. None of the others seem to
diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 7ad886fd..42479d86 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1187,7 +1187,7 @@ sub disconnect
 
 	# here we determine what needs to go out of the routing table
 	my @rout;
-	if ($node) {
+	if ($node && $pc39flag != 2) {
 		dbg('%Route::Node::List = ' . join(',', sort keys %Route::Node::list)) if isdbg('routedisc');
 
 		@rout = $node->del($main::routeroot);
diff --git a/perl/Version.pm b/perl/Version.pm
index f54e69da..ecefc7ca 100644
--- a/perl/Version.pm
+++ b/perl/Version.pm
@@ -11,6 +11,6 @@ use vars qw($version $subversion $build);
 
 $version = '1.54';
 $subversion = '0';
-$build = '127';
+$build = '128';
 
 1;