remove all $Id$ strings

2024-09-21 07:47:10 +00:00 · 2007-06-24 02:17:43 +01:00 · 2007-06-24 02:17:43 +01:00 · fd0a34c34a
commit fd0a34c34a
parent 9392cc93cc
89 changed files with 88 additions and 93 deletions
--- a/perl/AGWMsg.pm
+++ b/perl/AGWMsg.pm
@ -16,7 +16,7 @@
 # because I have the 'power of perl' available that avoids me getting 
 # terminally bored sorting out other people's sloppyness.
 #
-# $Id$
+#
 #
 # Copyright (c) 2001 - Dirk Koopman G1TLH
 #
--- a/perl/AnnTalk.pm
+++ b/perl/AnnTalk.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 2000 Dirk Koopman
 #
-# $Id$
+#
 #

 package AnnTalk;
--- a/perl/BBS.pm
+++ b/perl/BBS.pm
@ -6,7 +6,7 @@
 #
 # Copyright (c) 1999 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package BBS;
--- a/perl/BadWords.pm
+++ b/perl/BadWords.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 2000 Dirk Koopman
 #
-# $Id$
+#
 #

 package BadWords;
--- a/perl/Bands.pm
+++ b/perl/Bands.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Bands;
--- a/perl/CmdAlias.pm
+++ b/perl/CmdAlias.pm
@ -14,7 +14,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package CmdAlias;
--- a/perl/Console.pm
+++ b/perl/Console.pm
@ -6,7 +6,7 @@
 #
 # Copyright (c) 1999 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 # The colour pairs are:-
 #
--- a/perl/DXBearing.pm
+++ b/perl/DXBearing.pm
@ -8,7 +8,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXBearing;
--- a/perl/DXChannel.pm
+++ b/perl/DXChannel.pm
@ -21,7 +21,7 @@
 #
 # Copyright (c) 1998-2000 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 package DXChannel;

--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@ -4,7 +4,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 package DXCommandmode;
--- a/perl/DXConnect.pm
+++ b/perl/DXConnect.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXConnect;
--- a/perl/DXCron.pm
+++ b/perl/DXCron.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXCron;
--- a/perl/DXDebug.pm
+++ b/perl/DXDebug.pm
@ -4,7 +4,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXDebug;
--- a/perl/DXHash.pm
+++ b/perl/DXHash.pm
@ -14,7 +14,7 @@
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXHash;
--- a/perl/DXLog.pm
+++ b/perl/DXLog.pm
@ -20,7 +20,7 @@
 # 
 # Copyright (c) - 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXLog;
--- a/perl/DXLogPrint.pm
+++ b/perl/DXLogPrint.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) - 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXLog;
--- a/perl/DXM.pm
+++ b/perl/DXM.pm
@ -11,7 +11,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXM;
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@ -4,7 +4,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 #
 # Notes for implementors:-
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@ -4,7 +4,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXProt;
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@ -4,7 +4,7 @@
 #
 # Copyright (c) 1998-2006 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXProt;
--- a/perl/DXProtVars.pm
+++ b/perl/DXProtVars.pm
@ -6,7 +6,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXProt;
--- a/perl/DXProtout.pm
+++ b/perl/DXProtout.pm
@ -6,7 +6,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXProt;
--- a/perl/DXSql.pm
+++ b/perl/DXSql.pm
@ -1,7 +1,7 @@
 #
 # The master SQL module
 #
-# $Id$
+#
 #
 # Copyright (c) 2006 Dirk Koopman G1TLH
 #
--- a/perl/DXSql/SQLite.pm
+++ b/perl/DXSql/SQLite.pm
@ -3,7 +3,7 @@
 #
 # Stuff like table creates and (later) alters
 #
-# $Id$
+#
 #
 # Copyright (c) 2005 Dirk Koopman G1TLH
 #
--- a/perl/DXSql/mysql.pm
+++ b/perl/DXSql/mysql.pm
@ -3,7 +3,7 @@
 #
 # Stuff like table creates and (later) alters
 #
-# $Id$
+#
 #
 # Copyright (c) 2005 Dirk Koopman G1TLH
 #
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXUser;
--- a/perl/DXUtil.pm
+++ b/perl/DXUtil.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package DXUtil;
--- a/perl/DXVars.pm.issue
+++ b/perl/DXVars.pm.issue
@ -2,9 +2,8 @@
 # The system variables - those indicated will need to be changed to suit your
 # circumstances (and callsign)
 #
-# Copyright (c) 1998 - Dirk Koopman G1TLH
+# Copyright (c) 1998-2007 - Dirk Koopman G1TLH
 #
-# $Id$
 #

 package main;
--- a/perl/DXXml.pm
+++ b/perl/DXXml.pm
@ -1,7 +1,7 @@
 #
 # XML handler
 #
-# $Id$
+#
 #
 # Copyright (c) Dirk Koopman, G1TLH
 #
--- a/perl/DXXml/Cmd.pm
+++ b/perl/DXXml/Cmd.pm
@ -1,7 +1,7 @@
 #
 # XML (R)Cmd handler
 #
-# $Id$
+#
 #
 # Copyright (c) Dirk Koopman, G1TLH
 #
--- a/perl/DXXml/Dx.pm
+++ b/perl/DXXml/Dx.pm
@ -1,7 +1,7 @@
 #
 # XML DX Spot handler
 #
-# $Id$
+#
 #
 # Copyright (c) Dirk Koopman, G1TLH
 #
--- a/perl/DXXml/IM.pm
+++ b/perl/DXXml/IM.pm
@ -1,7 +1,7 @@
 #
 # XML IM handler (Chat, Announces, Talk)
 #
-# $Id$
+#
 #
 # Copyright (c) Dirk Koopman, G1TLH
 #
--- a/perl/DXXml/Ping.pm
+++ b/perl/DXXml/Ping.pm
@ -1,7 +1,7 @@
 #
 # XML Ping handler
 #
-# $Id$
+#
 #
 # Copyright (c) Dirk Koopman, G1TLH
 #
--- a/perl/DXXml/Text.pm
+++ b/perl/DXXml/Text.pm
@ -1,7 +1,7 @@
 #
 # XML Text handler
 #
-# $Id$
+#
 #
 # Copyright (c) Dirk Koopman, G1TLH
 #
--- a/perl/Editable.pm
+++ b/perl/Editable.pm
@ -8,7 +8,7 @@
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Editable;
--- a/perl/EphMsg.pm
+++ b/perl/EphMsg.pm
@ -6,7 +6,7 @@
 # An instance of this is setup by a command together with a load
 # of callbacks and then runs with a state machine until completion
 #
-# $Id$
+#
 #
 # Copyright (c) 2001 - Dirk Koopman G1TLH
 #
--- a/perl/ExtMsg.pm
+++ b/perl/ExtMsg.pm
@ -5,7 +5,7 @@
 # This is where the cluster handles direct connections coming both in
 # and out
 #
-# $Id$
+#
 #
 # Copyright (c) 2001 - Dirk Koopman G1TLH
 #
--- a/perl/Filter.pm
+++ b/perl/Filter.pm
@ -10,7 +10,7 @@
 #
 # Copyright (c) 1999 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 # The NEW INSTRUCTIONS
 #
--- a/perl/ForkingServer.pm
+++ b/perl/ForkingServer.pm
@ -13,7 +13,7 @@
 #
 # Copyright (c) 1999 - Dirk Koopman, Tobit Computer Co Ltd
 #
-# $Id$
+#
 #

 package ForkingServer;
--- a/perl/Geomag.pm
+++ b/perl/Geomag.pm
@ -5,7 +5,7 @@
 #
 # Copyright (c) 1998 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Geomag;
--- a/perl/IntMsg.pm
+++ b/perl/IntMsg.pm
@ -2,7 +2,7 @@
 # This class is the internal subclass that deals with the internal port 27754
 # communications for Msg.pm
 #
-# $Id$
+#
 #
 # Copyright (c) 2001 - Dirk Koopman G1TLH
 #
--- a/perl/Internet.pm
+++ b/perl/Internet.pm
@ -8,7 +8,7 @@
 #
 # Copyright (c) 2000 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Internet;
--- a/perl/Investigate.pm
+++ b/perl/Investigate.pm
@ -10,7 +10,7 @@
 #
 # Copyright (c) 2004 Dirk Koopman, G1TLH
 #
-# $Id$
+#
 #

 use strict;
--- a/perl/IsoTime.pm
+++ b/perl/IsoTime.pm
@ -1,7 +1,7 @@
 #
 # Utility routines for handling Iso 8601 date time groups
 #
-# $Id$
+#
 #
 # Copyright (c) Dirk Koopman, G1TLH
 #
--- a/perl/Julian.pm
+++ b/perl/Julian.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) - 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 use strict;
--- a/perl/LRU.pm
+++ b/perl/LRU.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 2002 Dirk Koopman, Tobit Computer Co Ltd 
 #
-# $Id$
+#
 #
 # The structure of the objects stored are:-
 #
--- a/perl/Log/Agent.pm
+++ b/perl/Log/Agent.pm
@ -5,7 +5,7 @@
 #
 # Copyright (c) Dirk Koopman
 #
-# $Id$
+#
 #

 package Log::Agent;
--- a/perl/Messages
+++ b/perl/Messages
@ -3,7 +3,6 @@
 # this file contains the system messages. Don't forget to reload them
 # if you change them (load/messages)
 #
-# $Id$
 #

 package DXM;
--- a/perl/Minimuf.pm
+++ b/perl/Minimuf.pm
@ -30,7 +30,7 @@
 # MINIMUF 3.5 from QST December 1982
 # (originally in BASIC)
 #
-# $Id$
+#
 #
 #

--- a/perl/Mrtg.pm
+++ b/perl/Mrtg.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) - 2002 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Mrtg;
--- a/perl/Msg.pm
+++ b/perl/Msg.pm
@ -5,7 +5,7 @@
 #
 # I have modified it to suit my devious purposes (Dirk Koopman G1TLH)
 #
-# $Id$
+#
 #

 package Msg;
--- a/perl/Prefix.pm
+++ b/perl/Prefix.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Prefix;
--- a/perl/RingBuf.pm
+++ b/perl/RingBuf.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) - 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 use strict;
--- a/perl/Route.pm
+++ b/perl/Route.pm
@ -9,7 +9,7 @@
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Route;
--- a/perl/Route/Node.pm
+++ b/perl/Route/Node.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Route::Node;
--- a/perl/Route/User.pm
+++ b/perl/Route/User.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 package Route::User;
--- a/perl/RouteDB.pm
+++ b/perl/RouteDB.pm
@ -13,7 +13,7 @@
 #
 # Copyright (c) 2004 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 package RouteDB;
--- a/perl/Script.pm
+++ b/perl/Script.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Script;
--- a/perl/Spot.pm
+++ b/perl/Spot.pm
@ -3,7 +3,7 @@
 #
 # Copyright (c) - 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package Spot;
--- a/perl/Sun.pm
+++ b/perl/Sun.pm
@ -16,7 +16,7 @@
 #
 # Copyright (c) 1999 - Steve Franke K9AN
 #
-# $Id$
+#
 # 
 # 2005/02/25 add calculation of civil dawn and dusk, defined to be times
 #            when solar zenith angle is 96 degrees.
--- a/perl/Thingy.pm
+++ b/perl/Thingy.pm
@ -3,7 +3,7 @@
 #
 # This is the new fundamental protocol engine handler
 #
-# $Id$
+#
 #
 # Copyright (c) 2004 Dirk Koopman G1TLH
 #
--- a/perl/Timer.pm
+++ b/perl/Timer.pm
@ -3,7 +3,7 @@
 #
 # This uses callbacks. BE CAREFUL!!!!
 #
-# $Id$
+#
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
--- a/perl/UDPMsg.pm
+++ b/perl/UDPMsg.pm
@ -7,7 +7,7 @@
 #
 # This class will morph into (and is the test bed for) Multicasts
 #
-# $Id$
+#
 #
 # Copyright (c) 2002 - Dirk Koopman G1TLH
 #
--- a/perl/Verify.pm
+++ b/perl/Verify.pm
@ -4,7 +4,7 @@
 #
 # Copyright (c) 2002 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 use strict;
--- a/perl/Version.pm
+++ b/perl/Version.pm
@ -11,6 +11,6 @@ use vars qw($version $subversion $build);

 $version = '1.54';
 $subversion = '0';
-$build = '82';
+$build = '83';

 1;
--- a/perl/WCY.pm
+++ b/perl/WCY.pm
@ -4,7 +4,7 @@
 #
 # Copyright (c) 2000 - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 package WCY;
--- a/perl/call.pl
+++ b/perl/call.pl
@ -3,7 +3,7 @@
 #
 # from an idea by Steve Franke K9AN and information from Angel EA7WA
 #
-# $Id$
+#
 #
 my ($self, $line) = @_;
 my @list = split /\s+/, $line;		      # generate a list of callsigns
--- a/perl/callbot.pl
+++ b/perl/callbot.pl
@ -10,7 +10,7 @@
 #
 # Copyright (c) 1999 - Dirk Koopman, Tobit Computer Co Ltd
 #
-# $Id$
+#
 #

 package main;
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@ -7,7 +7,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 require 5.004;
--- a/perl/connect.pl
+++ b/perl/connect.pl
@ -23,7 +23,7 @@
 #
 # Copyright (c) Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 # search local then perl directories
--- a/perl/console.pl
+++ b/perl/console.pl
@ -10,7 +10,7 @@
 #
 # Copyright (c) 1999 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 require 5.004;
--- a/perl/convkeps.pl
+++ b/perl/convkeps.pl
@ -32,7 +32,7 @@
 #
 # Copyright (c) 2000 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 require 5.004;
--- a/perl/create_prefix.pl
+++ b/perl/create_prefix.pl
@ -3,7 +3,7 @@
 #
 # Copyright (c) - Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 require 5.004;
--- a/perl/create_qsl.pl
+++ b/perl/create_qsl.pl
@ -4,7 +4,7 @@
 #
 # Copyright (c) 2003 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 # search local then perl directories
--- a/perl/create_sysop.pl
+++ b/perl/create_sysop.pl
@ -6,7 +6,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 # make sure that modules are searched in the order local then perl
--- a/perl/dxoldtonew.pl
+++ b/perl/dxoldtonew.pl
@ -11,7 +11,7 @@
 # for that day. This may then give strange 'out of order' results when viewed
 # with the show/dx command
 #
-# $Id$
+#
 #
 # Copyright (c) 1998-2003 Dirk Koopman G1TLH
 #
--- a/perl/gen_usdb_data.pl
+++ b/perl/gen_usdb_data.pl
@ -23,7 +23,7 @@
 #
 # Copyright (c) 2002 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 use strict;
--- a/perl/hlptohtml.pl
+++ b/perl/hlptohtml.pl
@ -5,7 +5,7 @@
 #
 # Copyright (c) - 1999 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 require 5.004;

--- a/perl/importkeps.pl
+++ b/perl/importkeps.pl
@ -5,7 +5,7 @@
 #
 # Copyright (c) 2004 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 use strict;
--- a/perl/importwwv.pl
+++ b/perl/importwwv.pl
@ -11,7 +11,7 @@
 #
 # Copyright (c) 2004 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 use strict;
--- a/perl/issue.pl
+++ b/perl/issue.pl
@ -2,7 +2,7 @@
 #
 # create a version and build id for the project using git ids
 #
-# $Id$
+#
 #
 # Copyright (c) 2007 Dirk Koopman, G1TLH
 #
--- a/perl/lock_nodes.pl
+++ b/perl/lock_nodes.pl
@ -10,7 +10,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 # make sure that modules are searched in the order local then perl
--- a/perl/log2csv.pl
+++ b/perl/log2csv.pl
@ -6,7 +6,7 @@
 #
 # Copyright (c) 2005 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 
 # make sure that modules are searched in the order local then perl
 use strict;
--- a/perl/process_ursa.pl
+++ b/perl/process_ursa.pl
@ -8,7 +8,7 @@
 #
 # Copyright (c) 2004 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #

 use strict;
--- a/perl/proto.html
+++ b/perl/proto.html
@ -11,7 +11,7 @@
    <address><a href="mailto:djk@tobit.co.uk"></a>Dirk Koopman G1TLH</address><br>
 <!-- Created: Sat Sep  4 21:11:44 BST 1999 -->
 <!-- hhmts start -->
-Last modified: Sat Sep  4 23:50:50 BST 1999
+Last modified: Sun Jun 24 02:15:14 BST 2007
 <!-- hhmts end -->
 	<hr>
 	<h4>Some thoughts</h4>
@ -145,7 +145,5 @@ Last modified: Sat Sep  4 23:50:50 BST 1999
 	  two cluster nodes.
    </p> 
 	<br>
-	<hr>
-	Document $Id$
  </body>
 </html>
--- a/perl/showdx
+++ b/perl/showdx
@ -4,8 +4,7 @@
 #
 # Copyright (c) 1998-2000 Dirk Koopman G1TLH
 #
-# $Id$
-#
+

 # search local then perl directories
 BEGIN {
--- a/perl/spot2csv.pl
+++ b/perl/spot2csv.pl
@ -6,7 +6,7 @@
 #
 # Copyright (c) 2001 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 
 # make sure that modules are searched in the order local then perl
 use strict;
--- a/perl/update_sysop.pl
+++ b/perl/update_sysop.pl
@ -10,7 +10,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 # 

 # make sure that modules are searched in the order local then perl
--- a/perl/winclient.pl
+++ b/perl/winclient.pl
@ -5,7 +5,7 @@
 # It's very scrappy, but it *does* do enough to allow SysOp console access. It also
 # means that since it's perl, Dirk might pretty it up a bit :-)
 #
-# $Id$
+#
 #
 # Iain Philipps, G0RDI	03-Mar-01
 #