From 19f68ea69f734f50b46fba21aab99315d5803e09 Mon Sep 17 00:00:00 2001
From: djk <djk>
Date: Sun, 11 Jun 2000 09:38:43 +0000
Subject: [PATCH] changed cluster copyright date removed extraneous DXDebug
 from DXUtil added set/echo to help

---
 Changes             | 2 ++
 cmd/Commands_en.hlp | 9 +++++++++
 perl/DXUtil.pm      | 2 --
 perl/cluster.pl     | 4 ++--
 4 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/Changes b/Changes
index 8ca0fe51..4ee08fec 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,5 @@
+11Jun00=======================================================================
+1. removed extraneous DXDebug from DXUtil
 10Jun00=======================================================================
 1. got rid of some more nasty bugs in sh/qra.
 2. fixed 9A3xx to always be Croatia (and not Haiti!).
diff --git a/cmd/Commands_en.hlp b/cmd/Commands_en.hlp
index f1272ee9..4d736989 100644
--- a/cmd/Commands_en.hlp
+++ b/cmd/Commands_en.hlp
@@ -427,6 +427,15 @@ SP is an alias for SEND PRIVATE
 === 0^SET/DX^Allow DX messages to come out on your terminal
 === 0^UNSET/DX^Stop DX messages coming out on your terminal
 
+=== 0^SET/ECHO^Make the cluster echo your input
+=== 0^UNSET/ECHO^Stop the cluster echoing your input
+If you are connected via a telnet session, different implimentations
+of telnet handle echo differently depending on whether you are 
+connected via port 23 or some other port. You can use this command
+to change the setting appropriately. 
+
+YOU DO NOT NEED TO USE THIS COMMAND IF YOU ARE CONNECTED VIA AX25.
+
 === 0^SET/HERE^Tell the system you are present at your terminal
 === 0^UNSET/HERE^Tell the system you are absent from your terminal
 
diff --git a/perl/DXUtil.pm b/perl/DXUtil.pm
index 0911d6ff..7be97ebf 100644
--- a/perl/DXUtil.pm
+++ b/perl/DXUtil.pm
@@ -12,8 +12,6 @@ use Date::Parse;
 use IO::File;
 use Data::Dumper;
 
-use DXDebug;
-
 require Exporter;
 @ISA = qw(Exporter);
 @EXPORT = qw(atime ztime cldate cldatetime slat slong yesno promptf 
diff --git a/perl/cluster.pl b/perl/cluster.pl
index 9f03281f..d3ab1871 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -68,7 +68,7 @@ package main;
 
 @inqueue = ();					# the main input queue, an array of hashes
 $systime = 0;					# the time now (in seconds)
-$version = "1.40";				# the version no of the software
+$version = "1.41";				# the version no of the software
 $starttime = 0;                 # the starting time of the cluster   
 $lockfn = "cluster.lock";       # lock file name
 @outstanding_connects = ();     # list of outstanding connects
@@ -299,7 +299,7 @@ STDOUT->autoflush(1);
 Log('cluster', "DXSpider V$version started");
 
 # banner
-dbg('err', "DXSpider DX Cluster Version $version", "Copyright (c) 1998-1999 Dirk Koopman G1TLH");
+dbg('err', "DXSpider DX Cluster Version $version", "Copyright (c) 1998-2000 Dirk Koopman G1TLH");
 
 # load Prefixes
 dbg('err', "loading prefixes ...");
-- 
2.43.0