From: Dirk Koopman Date: Wed, 11 Jul 2007 15:41:51 +0000 (+0100) Subject: remove $Id$ strings from everywhere that I can find X-Git-Tag: 1.55~101 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=c3505bcfc922cd712bad2c20b3479cf8d1dc54fe;p=spider.git remove $Id$ strings from everywhere that I can find --- diff --git a/Changes b/Changes index dfe89c6a..760164be 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,6 @@ 11Jul07======================================================================= 1. improve speed of sh/c/n +2. remove all $Id$ strings from cmd tree 09Jul07======================================================================= 1. remove check for PC93 from legacy nodes. This will allow PC10s to be propagated correctly. Probably. diff --git a/cmd/Commands_de.hlp b/cmd/Commands_de.hlp index b3557179..f4ddf395 100644 --- a/cmd/Commands_de.hlp +++ b/cmd/Commands_de.hlp @@ -9,7 +9,7 @@ # if the command ends in a - then that line isn't printed, but any # subsequent lines are # -# $Id$ +# # # Comment lines are indented before printing # diff --git a/cmd/Commands_en.hlp b/cmd/Commands_en.hlp index f5d3905c..659d6758 100644 --- a/cmd/Commands_en.hlp +++ b/cmd/Commands_en.hlp @@ -9,7 +9,7 @@ # if the command ends in a - then that line isn't printed, but any # subsequent lines are # -# $Id$ +# # # Comment lines are indented before printing # diff --git a/cmd/Commands_es.hlp b/cmd/Commands_es.hlp index 144133eb..21f4ab58 100644 --- a/cmd/Commands_es.hlp +++ b/cmd/Commands_es.hlp @@ -9,7 +9,7 @@ # if the command ends in a - then that line isn't printed, but any # subsequent lines are # -# $Id$ +# # # Comment lines are indented before printing # diff --git a/cmd/Commands_fr.hlp b/cmd/Commands_fr.hlp index 3b948a0a..e1dfb203 100644 --- a/cmd/Commands_fr.hlp +++ b/cmd/Commands_fr.hlp @@ -10,7 +10,7 @@ # Si la commande se termine par un "-", cette ligne n'est pas imprimée # mais les suivantes le sont. # -# $Id$ +# # # Les lignes de commentaires sont indentées avant l'affichage. # diff --git a/cmd/accept/announce.pl b/cmd/accept/announce.pl index 9eee8b9d..de956ed4 100644 --- a/cmd/accept/announce.pl +++ b/cmd/accept/announce.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/accept/route.pl b/cmd/accept/route.pl index ab5f4e1c..94a91396 100644 --- a/cmd/accept/route.pl +++ b/cmd/accept/route.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/accept/spots.pl b/cmd/accept/spots.pl index b8f4c861..2bacdfc8 100644 --- a/cmd/accept/spots.pl +++ b/cmd/accept/spots.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/accept/wcy.pl b/cmd/accept/wcy.pl index 048241bc..013c1e75 100644 --- a/cmd/accept/wcy.pl +++ b/cmd/accept/wcy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/accept/wwv.pl b/cmd/accept/wwv.pl index 965761c9..ff9906ed 100644 --- a/cmd/accept/wwv.pl +++ b/cmd/accept/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/agwrestart.pl b/cmd/agwrestart.pl index b9070573..a90eea00 100644 --- a/cmd/agwrestart.pl +++ b/cmd/agwrestart.pl @@ -1,7 +1,7 @@ # # restart an agw connection # -# $Id$ +# # my $self = shift; return (1, $self->msg('e5')) if $self->priv < 5; diff --git a/cmd/announce.pl b/cmd/announce.pl index 64abaad6..7f52a461 100644 --- a/cmd/announce.pl +++ b/cmd/announce.pl @@ -10,7 +10,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # # Modified 13Dec98 Iain Phillips G0RDI # diff --git a/cmd/apropos.pl b/cmd/apropos.pl index 98f799b3..1d6ac6bf 100644 --- a/cmd/apropos.pl +++ b/cmd/apropos.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/blank.pl b/cmd/blank.pl index ed3d585b..5032edf0 100644 --- a/cmd/blank.pl +++ b/cmd/blank.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/bye.pl b/cmd/bye.pl index 9a842efd..41d3ee91 100644 --- a/cmd/bye.pl +++ b/cmd/bye.pl @@ -1,7 +1,7 @@ # # the bye command # -# $Id$ +# # my $self = shift; diff --git a/cmd/catchup.pl b/cmd/catchup.pl index 20020067..81bf0539 100644 --- a/cmd/catchup.pl +++ b/cmd/catchup.pl @@ -4,7 +4,7 @@ # in other words mark all messages as being already received # by this node. # -# $Id$ +# # # Copyright (c) 1999 Dirk Koopman G1TLH # diff --git a/cmd/clear/announce.pl b/cmd/clear/announce.pl index 5ee0b424..9abee68b 100644 --- a/cmd/clear/announce.pl +++ b/cmd/clear/announce.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @f = split /\s+/, $line; diff --git a/cmd/clear/route.pl b/cmd/clear/route.pl index d5a3dfd2..403a777a 100644 --- a/cmd/clear/route.pl +++ b/cmd/clear/route.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @f = split /\s+/, $line; diff --git a/cmd/clear/spots.pl b/cmd/clear/spots.pl index e2c8a761..5ba0c8de 100644 --- a/cmd/clear/spots.pl +++ b/cmd/clear/spots.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @f = split /\s+/, $line; diff --git a/cmd/clear/wcy.pl b/cmd/clear/wcy.pl index cb0dd076..fe9583ef 100644 --- a/cmd/clear/wcy.pl +++ b/cmd/clear/wcy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @f = split /\s+/, $line; diff --git a/cmd/clear/wwv.pl b/cmd/clear/wwv.pl index 870710ce..0d52f5c8 100644 --- a/cmd/clear/wwv.pl +++ b/cmd/clear/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @f = split /\s+/, $line; diff --git a/cmd/debug.pl b/cmd/debug.pl index 5e69d098..1cecfcc4 100644 --- a/cmd/debug.pl +++ b/cmd/debug.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/delete/usdb.pl b/cmd/delete/usdb.pl index e6f1a57f..cb7f7a87 100644 --- a/cmd/delete/usdb.pl +++ b/cmd/delete/usdb.pl @@ -6,7 +6,7 @@ # # Copyright (c) 2002 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/delete/user.pl b/cmd/delete/user.pl index 5ab03a4f..2dc60db9 100644 --- a/cmd/delete/user.pl +++ b/cmd/delete/user.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/directory.pl b/cmd/directory.pl index 6726eb95..1e219321 100644 --- a/cmd/directory.pl +++ b/cmd/directory.pl @@ -3,7 +3,7 @@ # # Copyright (c) Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/do.pl b/cmd/do.pl index 5fdeeb3d..ae385008 100644 --- a/cmd/do.pl +++ b/cmd/do.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2000 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/dx.pl b/cmd/dx.pl index 9454fd70..1836f1fe 100644 --- a/cmd/dx.pl +++ b/cmd/dx.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/echo.pl b/cmd/echo.pl index 14497d43..1f361a62 100644 --- a/cmd/echo.pl +++ b/cmd/echo.pl @@ -4,7 +4,7 @@ # # Copyright (c) 2002 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/export.pl b/cmd/export.pl index fc1ebfd5..2ae0d427 100644 --- a/cmd/export.pl +++ b/cmd/export.pl @@ -3,7 +3,7 @@ # # Copyright (c) Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/export_users.pl b/cmd/export_users.pl index 4c143ebb..95b09e52 100644 --- a/cmd/export_users.pl +++ b/cmd/export_users.pl @@ -1,7 +1,7 @@ # # the export the user file to ascii command # -# $Id$ +# # my $self = shift; return (1, $self->msg('e5')) unless $self->priv >= 9; diff --git a/cmd/forward/latlong.pl b/cmd/forward/latlong.pl index e1023989..2282be3c 100644 --- a/cmd/forward/latlong.pl +++ b/cmd/forward/latlong.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/help.pl b/cmd/help.pl index ae11eedb..cc9eee3a 100644 --- a/cmd/help.pl +++ b/cmd/help.pl @@ -7,7 +7,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/init.pl b/cmd/init.pl index b508a04a..53297803 100644 --- a/cmd/init.pl +++ b/cmd/init.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @calls = split /\s+/, $line; diff --git a/cmd/join.pl b/cmd/join.pl index 69f220bf..2afbbd8a 100644 --- a/cmd/join.pl +++ b/cmd/join.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2003 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/kill.pl b/cmd/kill.pl index dce2c22f..8c8e275c 100644 --- a/cmd/kill.pl +++ b/cmd/kill.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # use strict; diff --git a/cmd/leave.pl b/cmd/leave.pl index f02add51..b0a299d8 100644 --- a/cmd/leave.pl +++ b/cmd/leave.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2003 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/links.pl b/cmd/links.pl index 4bad6285..b1737145 100644 --- a/cmd/links.pl +++ b/cmd/links.pl @@ -7,7 +7,7 @@ # and subsequently plagerized by K1XX. # # 16-Jun-2000 -# $Id$ +# # my $self = shift; diff --git a/cmd/load/cmd_cache.pl b/cmd/load/cmd_cache.pl index aa49f77e..9096f412 100644 --- a/cmd/load/cmd_cache.pl +++ b/cmd/load/cmd_cache.pl @@ -7,7 +7,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; #$DB::single = 1; diff --git a/cmd/load/usdb.pl b/cmd/load/usdb.pl index d2b10e30..88bf7b1b 100644 --- a/cmd/load/usdb.pl +++ b/cmd/load/usdb.pl @@ -9,7 +9,7 @@ # # Copyright (c) 2002 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/merge.pl b/cmd/merge.pl index 26cef42a..3f8cbcd1 100644 --- a/cmd/merge.pl +++ b/cmd/merge.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/mrtg.pl b/cmd/mrtg.pl index b2f45af4..9e6112c6 100644 --- a/cmd/mrtg.pl +++ b/cmd/mrtg.pl @@ -25,7 +25,7 @@ # # Copyright (c) 2002 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/msg.pl b/cmd/msg.pl index 93a10133..ddca3703 100644 --- a/cmd/msg.pl +++ b/cmd/msg.pl @@ -4,7 +4,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/pc.pl b/cmd/pc.pl index 12ab8fdc..c30c397a 100644 --- a/cmd/pc.pl +++ b/cmd/pc.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; my $line = shift; diff --git a/cmd/ping.pl b/cmd/ping.pl index f577bff1..1ea9dda8 100644 --- a/cmd/ping.pl +++ b/cmd/ping.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/privilege.pl b/cmd/privilege.pl index 7d80cebb..bdfb8ccd 100644 --- a/cmd/privilege.pl +++ b/cmd/privilege.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/rcmd.pl b/cmd/rcmd.pl index 31a02181..033ddd24 100644 --- a/cmd/rcmd.pl +++ b/cmd/rcmd.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/read.pl b/cmd/read.pl index 9d57307f..076e8dde 100644 --- a/cmd/read.pl +++ b/cmd/read.pl @@ -3,7 +3,7 @@ # # Copyright (c) Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/reject/announce.pl b/cmd/reject/announce.pl index 15d3066e..7cbe9905 100644 --- a/cmd/reject/announce.pl +++ b/cmd/reject/announce.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/reject/route.pl b/cmd/reject/route.pl index 59c325bb..3d0873de 100644 --- a/cmd/reject/route.pl +++ b/cmd/reject/route.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/reject/spots.pl b/cmd/reject/spots.pl index d434f0f3..55abdbb7 100644 --- a/cmd/reject/spots.pl +++ b/cmd/reject/spots.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/reject/wcy.pl b/cmd/reject/wcy.pl index 85ecf3b0..90a4b8b6 100644 --- a/cmd/reject/wcy.pl +++ b/cmd/reject/wcy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/reject/wwv.pl b/cmd/reject/wwv.pl index baee52fc..23a30a3d 100644 --- a/cmd/reject/wwv.pl +++ b/cmd/reject/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/reply.pl b/cmd/reply.pl index 82da8f6b..292316b5 100644 --- a/cmd/reply.pl +++ b/cmd/reply.pl @@ -14,7 +14,7 @@ # # Copyright (c) Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @out; diff --git a/cmd/rinit.pl b/cmd/rinit.pl index 3a7e17c0..5c5c0925 100644 --- a/cmd/rinit.pl +++ b/cmd/rinit.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @calls = split /\s+/, $line; diff --git a/cmd/run.pl b/cmd/run.pl index cfe2d8a2..a30c1972 100644 --- a/cmd/run.pl +++ b/cmd/run.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/save.pl b/cmd/save.pl index 0c4c8b22..bf24000e 100644 --- a/cmd/save.pl +++ b/cmd/save.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2002 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/send.pl b/cmd/send.pl index 97a1c535..08b2aa43 100644 --- a/cmd/send.pl +++ b/cmd/send.pl @@ -14,7 +14,7 @@ # # Copyright (c) Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (1, $self->msg('e5')) if $self->remotecmd || $self->inscript; diff --git a/cmd/set/address.pl b/cmd/set/address.pl index daea06c8..3109b56b 100644 --- a/cmd/set/address.pl +++ b/cmd/set/address.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/agwmonitor.pl b/cmd/set/agwmonitor.pl index 6de81998..448c8a90 100644 --- a/cmd/set/agwmonitor.pl +++ b/cmd/set/agwmonitor.pl @@ -1,7 +1,7 @@ # # set AGW engine monitoring # -# $Id$ +# # my $self = shift; diff --git a/cmd/set/announce.pl b/cmd/set/announce.pl index 533d177a..d98b7998 100644 --- a/cmd/set/announce.pl +++ b/cmd/set/announce.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/anntalk.pl b/cmd/set/anntalk.pl index 2d70f846..bfbd5950 100644 --- a/cmd/set/anntalk.pl +++ b/cmd/set/anntalk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/arcluster.pl b/cmd/set/arcluster.pl index 6ad80c6c..cfed97ab 100644 --- a/cmd/set/arcluster.pl +++ b/cmd/set/arcluster.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/baddx.pl b/cmd/set/baddx.pl index 748640e1..319e09ef 100644 --- a/cmd/set/baddx.pl +++ b/cmd/set/baddx.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $DXProt::baddx->set(8, $self->msg('e6'), $self, $line); diff --git a/cmd/set/badnode.pl b/cmd/set/badnode.pl index bcd4679c..abdd2e2b 100644 --- a/cmd/set/badnode.pl +++ b/cmd/set/badnode.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $DXProt::badnode->set(8, $self->msg('e12'), $self, $line); diff --git a/cmd/set/badspotter.pl b/cmd/set/badspotter.pl index 669a4ab5..645e217e 100644 --- a/cmd/set/badspotter.pl +++ b/cmd/set/badspotter.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; $line = join(' ', map {s|[/-]\d+$||; $_} split(/\s+/, $line)); diff --git a/cmd/set/badword.pl b/cmd/set/badword.pl index 21a38a3c..7df13cff 100644 --- a/cmd/set/badword.pl +++ b/cmd/set/badword.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $BadWords::badword->set(8, $self->msg('e6'), $self, $line); diff --git a/cmd/set/bbs.pl b/cmd/set/bbs.pl index f92f85de..d0960a30 100644 --- a/cmd/set/bbs.pl +++ b/cmd/set/bbs.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2001 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/beep.pl b/cmd/set/beep.pl index 7109404b..27adfb34 100644 --- a/cmd/set/beep.pl +++ b/cmd/set/beep.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; $self->beep(1); diff --git a/cmd/set/believe.pl b/cmd/set/believe.pl index aa31b365..95d776c3 100644 --- a/cmd/set/believe.pl +++ b/cmd/set/believe.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2004 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/buddy.pl b/cmd/set/buddy.pl index 2d99ef55..5d7c6150 100644 --- a/cmd/set/buddy.pl +++ b/cmd/set/buddy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2006 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/clx.pl b/cmd/set/clx.pl index dd0ee2fd..f27174ad 100644 --- a/cmd/set/clx.pl +++ b/cmd/set/clx.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/debug.pl b/cmd/set/debug.pl index f88434e2..0cf49662 100644 --- a/cmd/set/debug.pl +++ b/cmd/set/debug.pl @@ -1,7 +1,7 @@ # # add a debug level # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/dx.pl b/cmd/set/dx.pl index 3eb9bbf0..2690ddc7 100644 --- a/cmd/set/dx.pl +++ b/cmd/set/dx.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/dxcq.pl b/cmd/set/dxcq.pl index 0b6eeb7a..89c1a9c7 100644 --- a/cmd/set/dxcq.pl +++ b/cmd/set/dxcq.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/dxgrid.pl b/cmd/set/dxgrid.pl index ba02bf7e..0dfd29dd 100644 --- a/cmd/set/dxgrid.pl +++ b/cmd/set/dxgrid.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/dxitu.pl b/cmd/set/dxitu.pl index cb8da9d0..45e07497 100644 --- a/cmd/set/dxitu.pl +++ b/cmd/set/dxitu.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/dxnet.pl b/cmd/set/dxnet.pl index e8714c53..2d184adb 100644 --- a/cmd/set/dxnet.pl +++ b/cmd/set/dxnet.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/echo.pl b/cmd/set/echo.pl index d66f8a4d..4bf41ae7 100644 --- a/cmd/set/echo.pl +++ b/cmd/set/echo.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; $self->send_now("E", "1"); diff --git a/cmd/set/email.pl b/cmd/set/email.pl index 01c29caa..ac6c991c 100644 --- a/cmd/set/email.pl +++ b/cmd/set/email.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/gtk.pl b/cmd/set/gtk.pl index 0aec78c5..e591b773 100644 --- a/cmd/set/gtk.pl +++ b/cmd/set/gtk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2006 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/here.pl b/cmd/set/here.pl index 646997ea..9d2e12be 100644 --- a/cmd/set/here.pl +++ b/cmd/set/here.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/homebbs.pl b/cmd/set/homebbs.pl index 3ab08f25..72a48f0a 100644 --- a/cmd/set/homebbs.pl +++ b/cmd/set/homebbs.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/homenode.pl b/cmd/set/homenode.pl index b2d7d342..a643bed7 100644 --- a/cmd/set/homenode.pl +++ b/cmd/set/homenode.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/hops.pl b/cmd/set/hops.pl index c458b578..a4478f2b 100644 --- a/cmd/set/hops.pl +++ b/cmd/set/hops.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (0, $self->msg('e5')) if $self->priv < 8; diff --git a/cmd/set/isolate.pl b/cmd/set/isolate.pl index b90f0c2b..90de6683 100644 --- a/cmd/set/isolate.pl +++ b/cmd/set/isolate.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/language.pl b/cmd/set/language.pl index a068e0d9..8429a384 100644 --- a/cmd/set/language.pl +++ b/cmd/set/language.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/local_node.pl b/cmd/set/local_node.pl index 0e973280..b221c881 100644 --- a/cmd/set/local_node.pl +++ b/cmd/set/local_node.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2006 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/location.pl b/cmd/set/location.pl index 9d31dcf5..1e758f81 100644 --- a/cmd/set/location.pl +++ b/cmd/set/location.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/lockout.pl b/cmd/set/lockout.pl index d25a5261..ac7cc83a 100644 --- a/cmd/set/lockout.pl +++ b/cmd/set/lockout.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Iain Phillips G0RDI # -# $Id$ +# # my ($self, $line) = @_; my @args = split /\s+/, $line; diff --git a/cmd/set/logininfo.pl b/cmd/set/logininfo.pl index 0e0c6589..f74ee099 100644 --- a/cmd/set/logininfo.pl +++ b/cmd/set/logininfo.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; $self->user->wantlogininfo(1); diff --git a/cmd/set/name.pl b/cmd/set/name.pl index 4bffef41..b8dd3150 100644 --- a/cmd/set/name.pl +++ b/cmd/set/name.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/node.pl b/cmd/set/node.pl index 95b38bb6..82e8be11 100644 --- a/cmd/set/node.pl +++ b/cmd/set/node.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/obscount.pl b/cmd/set/obscount.pl index 8a6dc425..1e9b53b5 100644 --- a/cmd/set/obscount.pl +++ b/cmd/set/obscount.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/page.pl b/cmd/set/page.pl index 6b509759..38598945 100644 --- a/cmd/set/page.pl +++ b/cmd/set/page.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; my $l = shift; diff --git a/cmd/set/pinginterval.pl b/cmd/set/pinginterval.pl index 1e1da569..33131cc5 100644 --- a/cmd/set/pinginterval.pl +++ b/cmd/set/pinginterval.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/privilege.pl b/cmd/set/privilege.pl index 7f6cbd39..183c101b 100644 --- a/cmd/set/privilege.pl +++ b/cmd/set/privilege.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @args = split /\s+/, $line; diff --git a/cmd/set/prompt.pl b/cmd/set/prompt.pl index c1653c61..3ff1291e 100644 --- a/cmd/set/prompt.pl +++ b/cmd/set/prompt.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/qra.pl b/cmd/set/qra.pl index 4bae21c3..e4c4edcb 100644 --- a/cmd/set/qra.pl +++ b/cmd/set/qra.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/qth.pl b/cmd/set/qth.pl index 4a5a881f..03c5c849 100644 --- a/cmd/set/qth.pl +++ b/cmd/set/qth.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/register.pl b/cmd/set/register.pl index 509eaff6..22c85be9 100644 --- a/cmd/set/register.pl +++ b/cmd/set/register.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @args = split /\s+/, $line; diff --git a/cmd/set/routepc19.pl b/cmd/set/routepc19.pl index 6b5364bd..4c5d2efc 100644 --- a/cmd/set/routepc19.pl +++ b/cmd/set/routepc19.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2002 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/send_dbg.pl b/cmd/set/send_dbg.pl index 2fe8c6db..317d354f 100644 --- a/cmd/set/send_dbg.pl +++ b/cmd/set/send_dbg.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/sendpc16.pl b/cmd/set/sendpc16.pl index 342e99e7..11ca2e87 100644 --- a/cmd/set/sendpc16.pl +++ b/cmd/set/sendpc16.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2002 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/spider.pl b/cmd/set/spider.pl index 9c821826..bd50853c 100644 --- a/cmd/set/spider.pl +++ b/cmd/set/spider.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/startup.pl b/cmd/set/startup.pl index aff00ca1..c8a592dc 100644 --- a/cmd/set/startup.pl +++ b/cmd/set/startup.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2005 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (1, $self->msg('e5')) if $self->remotecmd || $self->inscript; diff --git a/cmd/set/sys_location.pl b/cmd/set/sys_location.pl index 58fb6ae5..428d5bfc 100644 --- a/cmd/set/sys_location.pl +++ b/cmd/set/sys_location.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/sys_qra.pl b/cmd/set/sys_qra.pl index 9fc66fc1..201bc77c 100644 --- a/cmd/set/sys_qra.pl +++ b/cmd/set/sys_qra.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/talk.pl b/cmd/set/talk.pl index 0c1e6be7..e35877d5 100644 --- a/cmd/set/talk.pl +++ b/cmd/set/talk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/usdb.pl b/cmd/set/usdb.pl index 9e9ef05e..f8d8fa65 100644 --- a/cmd/set/usdb.pl +++ b/cmd/set/usdb.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2002 Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/user.pl b/cmd/set/user.pl index a4b76bd3..afe67c7e 100644 --- a/cmd/set/user.pl +++ b/cmd/set/user.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (1, $self->msg('e5')) if $self->priv < 9; diff --git a/cmd/set/usstate.pl b/cmd/set/usstate.pl index 7403843b..f6c56721 100644 --- a/cmd/set/usstate.pl +++ b/cmd/set/usstate.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/var.pl b/cmd/set/var.pl index 5352baf3..05c1f589 100644 --- a/cmd/set/var.pl +++ b/cmd/set/var.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1999 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/ve7cc.pl b/cmd/set/ve7cc.pl index b4ec3b14..77f8bc84 100644 --- a/cmd/set/ve7cc.pl +++ b/cmd/set/ve7cc.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/wantpc16.pl b/cmd/set/wantpc16.pl index de0a0ddd..0567de40 100644 --- a/cmd/set/wantpc16.pl +++ b/cmd/set/wantpc16.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2002 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/wantpc9x.pl b/cmd/set/wantpc9x.pl index a705cc56..60566f04 100644 --- a/cmd/set/wantpc9x.pl +++ b/cmd/set/wantpc9x.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2007 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/wcy.pl b/cmd/set/wcy.pl index 8efd6299..ae5b7237 100644 --- a/cmd/set/wcy.pl +++ b/cmd/set/wcy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/wwv.pl b/cmd/set/wwv.pl index 33ac7861..83039741 100644 --- a/cmd/set/wwv.pl +++ b/cmd/set/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/set/wx.pl b/cmd/set/wx.pl index ef6a71cc..359f1236 100644 --- a/cmd/set/wx.pl +++ b/cmd/set/wx.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1999 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/425.pl b/cmd/show/425.pl index c825b91b..353f2b9d 100644 --- a/cmd/show/425.pl +++ b/cmd/show/425.pl @@ -3,7 +3,7 @@ # # from an idea by Leo,IZ5FSA and 425DxNews Group # -# $Id$ +# # my ($self, $line) = @_; my @list = map {uc} split /\s+/, $line; # generate a list of callsigns diff --git a/cmd/show/announce.pl b/cmd/show/announce.pl index 350ff0ef..9ec0111b 100644 --- a/cmd/show/announce.pl +++ b/cmd/show/announce.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/show/baddx.pl b/cmd/show/baddx.pl index 6e8718c0..7780e46b 100644 --- a/cmd/show/baddx.pl +++ b/cmd/show/baddx.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $DXProt::baddx->show(1, $self); diff --git a/cmd/show/badnode.pl b/cmd/show/badnode.pl index cbfa5047..f8aa263c 100644 --- a/cmd/show/badnode.pl +++ b/cmd/show/badnode.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $DXProt::badnode->show(1, $self); diff --git a/cmd/show/badspotter.pl b/cmd/show/badspotter.pl index 1110a0b8..272e74c3 100644 --- a/cmd/show/badspotter.pl +++ b/cmd/show/badspotter.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $DXProt::badspotter->show(1, $self); diff --git a/cmd/show/badword.pl b/cmd/show/badword.pl index eddefef8..0b5bbec3 100644 --- a/cmd/show/badword.pl +++ b/cmd/show/badword.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $BadWords::badword->show(1, $self); diff --git a/cmd/show/bands.pl b/cmd/show/bands.pl index d2b818aa..9bdd5dc6 100644 --- a/cmd/show/bands.pl +++ b/cmd/show/bands.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # #$DB::single = 1; diff --git a/cmd/show/buddy.pl b/cmd/show/buddy.pl index 0f5b7a6c..78ceffd3 100644 --- a/cmd/show/buddy.pl +++ b/cmd/show/buddy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2006 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self) = @_; diff --git a/cmd/show/chat.pl b/cmd/show/chat.pl index 3105c36b..7895c3b5 100644 --- a/cmd/show/chat.pl +++ b/cmd/show/chat.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998-2003 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/show/configuration.pl b/cmd/show/configuration.pl index 746ab4b0..416e1a0e 100644 --- a/cmd/show/configuration.pl +++ b/cmd/show/configuration.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/connect.pl b/cmd/show/connect.pl index 025c20ea..77598be4 100644 --- a/cmd/show/connect.pl +++ b/cmd/show/connect.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/show/contest.pl b/cmd/show/contest.pl index cb5b0a04..08f555ee 100644 --- a/cmd/show/contest.pl +++ b/cmd/show/contest.pl @@ -4,7 +4,7 @@ # Tommy Johansson (SM3OSM) 2002-07-23 # New version using Net::Telnet 2003-03-09 # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/date.pl b/cmd/show/date.pl index 264bc5ed..ddf23040 100644 --- a/cmd/show/date.pl +++ b/cmd/show/date.pl @@ -6,7 +6,7 @@ # # Shamelessly cribbed from time.pl:- # -# $Id$ +# # diff --git a/cmd/show/db0sdx.pl b/cmd/show/db0sdx.pl index 97f7a04e..1a7662f6 100644 --- a/cmd/show/db0sdx.pl +++ b/cmd/show/db0sdx.pl @@ -5,7 +5,7 @@ # Modified Dec 9, 2004 for new website and xml schema by David Spoelstra N9KT # and tidied up by me (Dirk) # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/debug.pl b/cmd/show/debug.pl index 1c496dab..11c3a84d 100644 --- a/cmd/show/debug.pl +++ b/cmd/show/debug.pl @@ -1,7 +1,7 @@ # # show the debug status # -# $Id$ +# # use DXDebug; diff --git a/cmd/show/dup_ann.pl b/cmd/show/dup_ann.pl index 29a235be..3fe95c2c 100644 --- a/cmd/show/dup_ann.pl +++ b/cmd/show/dup_ann.pl @@ -4,7 +4,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; my $line = shift; diff --git a/cmd/show/dup_eph.pl b/cmd/show/dup_eph.pl index cc0b2149..6b0ec83c 100644 --- a/cmd/show/dup_eph.pl +++ b/cmd/show/dup_eph.pl @@ -4,7 +4,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; my $line = shift; diff --git a/cmd/show/dup_spots.pl b/cmd/show/dup_spots.pl index 63df8b6d..ba9c31e6 100644 --- a/cmd/show/dup_spots.pl +++ b/cmd/show/dup_spots.pl @@ -4,7 +4,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; my $line = shift; diff --git a/cmd/show/dup_wcy.pl b/cmd/show/dup_wcy.pl index d326698d..030fe8c7 100644 --- a/cmd/show/dup_wcy.pl +++ b/cmd/show/dup_wcy.pl @@ -4,7 +4,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; my $line = shift; diff --git a/cmd/show/dup_wwv.pl b/cmd/show/dup_wwv.pl index 1360907c..eb3e934d 100644 --- a/cmd/show/dup_wwv.pl +++ b/cmd/show/dup_wwv.pl @@ -4,7 +4,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; my $line = shift; diff --git a/cmd/show/dx.pl b/cmd/show/dx.pl index 6908a527..f99a2b6c 100644 --- a/cmd/show/dx.pl +++ b/cmd/show/dx.pl @@ -1,7 +1,7 @@ # # show dx (normal) # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/dxqsl.pl b/cmd/show/dxqsl.pl index 86905d51..a4b0a3f9 100644 --- a/cmd/show/dxqsl.pl +++ b/cmd/show/dxqsl.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2003 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/dxstats.pl b/cmd/show/dxstats.pl index 9924a903..52ac5d82 100644 --- a/cmd/show/dxstats.pl +++ b/cmd/show/dxstats.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/files.pl b/cmd/show/files.pl index c57accc1..2463fe96 100644 --- a/cmd/show/files.pl +++ b/cmd/show/files.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/filter.pl b/cmd/show/filter.pl index f1522c35..f3aab016 100644 --- a/cmd/show/filter.pl +++ b/cmd/show/filter.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @f = split /\s+/, $line; diff --git a/cmd/show/groups.pl b/cmd/show/groups.pl index 02f2f006..f91e66ca 100644 --- a/cmd/show/groups.pl +++ b/cmd/show/groups.pl @@ -3,7 +3,7 @@ # # by Tommy SM3OSM # -# $Id$ +# # use Time::Local; diff --git a/cmd/show/heading.pl b/cmd/show/heading.pl index 122ed5e4..353a0477 100644 --- a/cmd/show/heading.pl +++ b/cmd/show/heading.pl @@ -1,7 +1,7 @@ # # show the heading and distance for each callsign or prefix entered # -# $Id$ +# # # AK1A-compatible output Iain Philipps, G0RDI 16-Dec-1998 # diff --git a/cmd/show/hfstats.pl b/cmd/show/hfstats.pl index 2072e7e0..fdbd8efd 100644 --- a/cmd/show/hfstats.pl +++ b/cmd/show/hfstats.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # # Modified on 2002/10/29 by K1XX for his own use # Valid inputs: diff --git a/cmd/show/hftable.pl b/cmd/show/hftable.pl index 4bcd3d19..40e54aa9 100644 --- a/cmd/show/hftable.pl +++ b/cmd/show/hftable.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # # Modified on 2002/10/27 by K1XX for his own use # Valid inputs (and then tarted up by G1TLH to include in the diff --git a/cmd/show/hops.pl b/cmd/show/hops.pl index 34392e2b..1aae29e9 100644 --- a/cmd/show/hops.pl +++ b/cmd/show/hops.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @f = split /\s+/, $line; diff --git a/cmd/show/isolate.pl b/cmd/show/isolate.pl index 2bc94376..17470bde 100644 --- a/cmd/show/isolate.pl +++ b/cmd/show/isolate.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/lockout.pl b/cmd/show/lockout.pl index 02acee09..ff56ca19 100644 --- a/cmd/show/lockout.pl +++ b/cmd/show/lockout.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/log.pl b/cmd/show/log.pl index bad1f61d..3ff4a50b 100644 --- a/cmd/show/log.pl +++ b/cmd/show/log.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/show/msg_status.pl b/cmd/show/msg_status.pl index 6c3e1cb3..77118860 100644 --- a/cmd/show/msg_status.pl +++ b/cmd/show/msg_status.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (0, $self->msg('e5')) if $self->priv < 5; diff --git a/cmd/show/muf.pl b/cmd/show/muf.pl index 18708d50..729b6584 100644 --- a/cmd/show/muf.pl +++ b/cmd/show/muf.pl @@ -6,7 +6,7 @@ # # as fixed by Steve Franke K9AN # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/newconfiguration.pl b/cmd/show/newconfiguration.pl index 668a0b70..516e4487 100644 --- a/cmd/show/newconfiguration.pl +++ b/cmd/show/newconfiguration.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/node.pl b/cmd/show/node.pl index fa4a3505..a1ab8eca 100644 --- a/cmd/show/node.pl +++ b/cmd/show/node.pl @@ -11,7 +11,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/prefix.pl b/cmd/show/prefix.pl index b416bf4b..e8e939e6 100644 --- a/cmd/show/prefix.pl +++ b/cmd/show/prefix.pl @@ -1,7 +1,7 @@ # # show the prefix info for each callsign or prefix entered # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/program.pl b/cmd/show/program.pl index e7416460..c943cab9 100644 --- a/cmd/show/program.pl +++ b/cmd/show/program.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; return (1, $self->msg('e5')) if $self->priv < 5; diff --git a/cmd/show/qra.pl b/cmd/show/qra.pl index bea55047..574e351a 100644 --- a/cmd/show/qra.pl +++ b/cmd/show/qra.pl @@ -3,7 +3,7 @@ # # you can enter two qra locators and it will calc the distance between them # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/qrz.pl b/cmd/show/qrz.pl index fdcdc59d..e0ee31a6 100644 --- a/cmd/show/qrz.pl +++ b/cmd/show/qrz.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @list = split /\s+/, $line; # generate a list of callsigns diff --git a/cmd/show/rcmd.pl b/cmd/show/rcmd.pl index d8f02d5e..ef45b6c6 100644 --- a/cmd/show/rcmd.pl +++ b/cmd/show/rcmd.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/show/registered.pl b/cmd/show/registered.pl index e4b6bce9..593ef0f5 100644 --- a/cmd/show/registered.pl +++ b/cmd/show/registered.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/route.pl b/cmd/show/route.pl index 6d1c194c..04eecd86 100644 --- a/cmd/show/route.pl +++ b/cmd/show/route.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/satellite.pl b/cmd/show/satellite.pl index 45e765f2..35bc7b88 100644 --- a/cmd/show/satellite.pl +++ b/cmd/show/satellite.pl @@ -4,7 +4,7 @@ # # copyright (c) 1999 Steve Franke K9AN # -# $Id$ +# # # 2001/12/16 added age of keps in the sh/sat output list. # Note - there is the potential for problems when satellite name diff --git a/cmd/show/startup.pl b/cmd/show/startup.pl index 6bb3e854..c1fd6f5f 100644 --- a/cmd/show/startup.pl +++ b/cmd/show/startup.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2005 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (1, $self->msg('e5')) if $self->remotecmd || $self->inscript; diff --git a/cmd/show/talk.pl b/cmd/show/talk.pl index 81d6dc06..869e8d3a 100644 --- a/cmd/show/talk.pl +++ b/cmd/show/talk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/show/time.pl b/cmd/show/time.pl index 6593ee3d..986320e5 100644 --- a/cmd/show/time.pl +++ b/cmd/show/time.pl @@ -4,7 +4,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/usdb.pl b/cmd/show/usdb.pl index 8800d5b8..4aec72dc 100644 --- a/cmd/show/usdb.pl +++ b/cmd/show/usdb.pl @@ -1,7 +1,7 @@ # # show the usdb info for each callsign or prefix entered # -# $Id$ +# # # Copyright (c) 2002 Dirk Koopman G1TLH # diff --git a/cmd/show/users.pl b/cmd/show/users.pl index c9df4d69..125b23d1 100644 --- a/cmd/show/users.pl +++ b/cmd/show/users.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/var.pl b/cmd/show/var.pl index f0149cce..e4919cbd 100644 --- a/cmd/show/var.pl +++ b/cmd/show/var.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1999 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/version.pl b/cmd/show/version.pl index be5aab84..661b0f27 100644 --- a/cmd/show/version.pl +++ b/cmd/show/version.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my @out; diff --git a/cmd/show/vhfstats.pl b/cmd/show/vhfstats.pl index 121a5ff6..26970f6a 100644 --- a/cmd/show/vhfstats.pl +++ b/cmd/show/vhfstats.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/vhftable.pl b/cmd/show/vhftable.pl index 9df5e4a7..d1320290 100644 --- a/cmd/show/vhftable.pl +++ b/cmd/show/vhftable.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/show/wcy.pl b/cmd/show/wcy.pl index 9433fc75..d833bb06 100644 --- a/cmd/show/wcy.pl +++ b/cmd/show/wcy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/show/wm7d.pl b/cmd/show/wm7d.pl index 097a6295..6dfb5b14 100644 --- a/cmd/show/wm7d.pl +++ b/cmd/show/wm7d.pl @@ -5,7 +5,7 @@ # # Copyright (c) 2002 Charlie Carroll K1XX # -# $Id$ +# # # wm7d accepts only single callsign diff --git a/cmd/show/wwv.pl b/cmd/show/wwv.pl index 988b760a..fbb7fac3 100644 --- a/cmd/show/wwv.pl +++ b/cmd/show/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/shu.pl b/cmd/shu.pl index 9ba65b5b..d7704f56 100644 --- a/cmd/shu.pl +++ b/cmd/shu.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2002 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/shutdown.pl b/cmd/shutdown.pl index 1a5a5663..30592ad0 100644 --- a/cmd/shutdown.pl +++ b/cmd/shutdown.pl @@ -1,7 +1,7 @@ # # the shutdown command # -# $Id$ +# # my $self = shift; my $call = $self->call; diff --git a/cmd/stat/channel.pl b/cmd/stat/channel.pl index be4e5f93..472e7cf4 100644 --- a/cmd/stat/channel.pl +++ b/cmd/stat/channel.pl @@ -1,7 +1,7 @@ # # show the channel status # -# $Id$ +# # use strict; diff --git a/cmd/stat/db.pl b/cmd/stat/db.pl index 04240cd2..9bbbcf88 100644 --- a/cmd/stat/db.pl +++ b/cmd/stat/db.pl @@ -1,7 +1,7 @@ # # show all the values in a db fcb # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/stat/msg.pl b/cmd/stat/msg.pl index 715c8667..6dd9760f 100644 --- a/cmd/stat/msg.pl +++ b/cmd/stat/msg.pl @@ -1,7 +1,7 @@ # # show all the values on a message header # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/stat/nodeconfig.pl b/cmd/stat/nodeconfig.pl index 5fa45b9e..00f1c94c 100644 --- a/cmd/stat/nodeconfig.pl +++ b/cmd/stat/nodeconfig.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/stat/pc19list.pl b/cmd/stat/pc19list.pl index 58623cdb..c95af2c4 100644 --- a/cmd/stat/pc19list.pl +++ b/cmd/stat/pc19list.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2003 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; diff --git a/cmd/stat/route_node.pl b/cmd/stat/route_node.pl index c546e601..05560e70 100644 --- a/cmd/stat/route_node.pl +++ b/cmd/stat/route_node.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/stat/route_user.pl b/cmd/stat/route_user.pl index e39584cb..966f0d9b 100644 --- a/cmd/stat/route_user.pl +++ b/cmd/stat/route_user.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/stat/user.pl b/cmd/stat/user.pl index 61a6e7bf..1e0f15da 100644 --- a/cmd/stat/user.pl +++ b/cmd/stat/user.pl @@ -1,7 +1,7 @@ # # show either the current user or a nominated set # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/stat/userconfig.pl b/cmd/stat/userconfig.pl index f4321160..fd86f748 100644 --- a/cmd/stat/userconfig.pl +++ b/cmd/stat/userconfig.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/talk.pl b/cmd/talk.pl index ebd762ff..1f7baa30 100644 --- a/cmd/talk.pl +++ b/cmd/talk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $inline) = @_; diff --git a/cmd/type.pl b/cmd/type.pl index df289e69..d4b98ef7 100644 --- a/cmd/type.pl +++ b/cmd/type.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/uncatchup.pl b/cmd/uncatchup.pl index fb54f7e2..8a6d736a 100644 --- a/cmd/uncatchup.pl +++ b/cmd/uncatchup.pl @@ -4,7 +4,7 @@ # in other words mark all messages as being already received # by this node. # -# $Id$ +# # # Copyright (c) 1999 Dirk Koopman G1TLH # diff --git a/cmd/unset/agwmonitor.pl b/cmd/unset/agwmonitor.pl index c9bfb6e8..a68a7053 100644 --- a/cmd/unset/agwmonitor.pl +++ b/cmd/unset/agwmonitor.pl @@ -1,7 +1,7 @@ # # unset AGW engine monitoring # -# $Id$ +# # my $self = shift; diff --git a/cmd/unset/announce.pl b/cmd/unset/announce.pl index 3e7b61dc..6b30857a 100644 --- a/cmd/unset/announce.pl +++ b/cmd/unset/announce.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/anntalk.pl b/cmd/unset/anntalk.pl index 9b7cc238..ed9cef52 100644 --- a/cmd/unset/anntalk.pl +++ b/cmd/unset/anntalk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/baddx.pl b/cmd/unset/baddx.pl index e9798728..58760050 100644 --- a/cmd/unset/baddx.pl +++ b/cmd/unset/baddx.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $DXProt::baddx->unset(8, $self->msg('e6'), $self, $line); diff --git a/cmd/unset/badnode.pl b/cmd/unset/badnode.pl index 65d10527..12f143ab 100644 --- a/cmd/unset/badnode.pl +++ b/cmd/unset/badnode.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $DXProt::badnode->unset(8, $self->msg('e12'), $self, $line); diff --git a/cmd/unset/badspotter.pl b/cmd/unset/badspotter.pl index 5c2433e9..8259133b 100644 --- a/cmd/unset/badspotter.pl +++ b/cmd/unset/badspotter.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; $line = join(' ', map {s|[/-]\d+$||; $_} split(/\s+/, $line)); diff --git a/cmd/unset/badword.pl b/cmd/unset/badword.pl index 519604f1..6a38d775 100644 --- a/cmd/unset/badword.pl +++ b/cmd/unset/badword.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return $BadWords::badword->unset(8, $self->msg('e6'), $self, $line); diff --git a/cmd/unset/beep.pl b/cmd/unset/beep.pl index 749029b3..af135723 100644 --- a/cmd/unset/beep.pl +++ b/cmd/unset/beep.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; $self->user->wantbeep(0); diff --git a/cmd/unset/believe.pl b/cmd/unset/believe.pl index 4ee33f50..2d0a6e3a 100644 --- a/cmd/unset/believe.pl +++ b/cmd/unset/believe.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2004 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/buddy.pl b/cmd/unset/buddy.pl index bfea54d7..60c4f5b6 100644 --- a/cmd/unset/buddy.pl +++ b/cmd/unset/buddy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2006 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/debug.pl b/cmd/unset/debug.pl index 9dafb31d..c0b7e982 100644 --- a/cmd/unset/debug.pl +++ b/cmd/unset/debug.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/dx.pl b/cmd/unset/dx.pl index 2090b780..b7cc4bfd 100644 --- a/cmd/unset/dx.pl +++ b/cmd/unset/dx.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/dxcq.pl b/cmd/unset/dxcq.pl index 229c1289..fc2d7c5e 100644 --- a/cmd/unset/dxcq.pl +++ b/cmd/unset/dxcq.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/dxgrid.pl b/cmd/unset/dxgrid.pl index dbef4190..f18f2c22 100644 --- a/cmd/unset/dxgrid.pl +++ b/cmd/unset/dxgrid.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/dxitu.pl b/cmd/unset/dxitu.pl index a3236f52..27b7fc41 100644 --- a/cmd/unset/dxitu.pl +++ b/cmd/unset/dxitu.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/echo.pl b/cmd/unset/echo.pl index c4c41c2c..59287070 100644 --- a/cmd/unset/echo.pl +++ b/cmd/unset/echo.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; $self->send_now("E", "0"); diff --git a/cmd/unset/email.pl b/cmd/unset/email.pl index 2829a194..0f61405e 100644 --- a/cmd/unset/email.pl +++ b/cmd/unset/email.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/gtk.pl b/cmd/unset/gtk.pl index 90b6cba7..48ea8ded 100644 --- a/cmd/unset/gtk.pl +++ b/cmd/unset/gtk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2006 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/here.pl b/cmd/unset/here.pl index d83d59cb..59b2080a 100644 --- a/cmd/unset/here.pl +++ b/cmd/unset/here.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/hops.pl b/cmd/unset/hops.pl index 60668d10..f24154bd 100644 --- a/cmd/unset/hops.pl +++ b/cmd/unset/hops.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (0, $self->msg('e5')) if $self->priv < 8; diff --git a/cmd/unset/isolate.pl b/cmd/unset/isolate.pl index 6396caef..07ad21dc 100644 --- a/cmd/unset/isolate.pl +++ b/cmd/unset/isolate.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/local_node.pl b/cmd/unset/local_node.pl index dd08b525..c9439ae3 100644 --- a/cmd/unset/local_node.pl +++ b/cmd/unset/local_node.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2006 - Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/lockout.pl b/cmd/unset/lockout.pl index d8c8a126..406d2125 100644 --- a/cmd/unset/lockout.pl +++ b/cmd/unset/lockout.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 Iain Phillips G0RDI # -# $Id$ +# # my ($self, $line) = @_; my @args = split /\s+/, $line; diff --git a/cmd/unset/logininfo.pl b/cmd/unset/logininfo.pl index 1f2aa995..3e4aa9b7 100644 --- a/cmd/unset/logininfo.pl +++ b/cmd/unset/logininfo.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; $self->user->wantlogininfo(0); diff --git a/cmd/unset/node.pl b/cmd/unset/node.pl index 76350a3f..b560e6ef 100644 --- a/cmd/unset/node.pl +++ b/cmd/unset/node.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/privilege.pl b/cmd/unset/privilege.pl index d031a4ac..d5a7e00e 100644 --- a/cmd/unset/privilege.pl +++ b/cmd/unset/privilege.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; $self->priv(0); diff --git a/cmd/unset/prompt.pl b/cmd/unset/prompt.pl index 35d02a0b..4aff6d4a 100644 --- a/cmd/unset/prompt.pl +++ b/cmd/unset/prompt.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/register.pl b/cmd/unset/register.pl index f789d1ed..5ba142d6 100644 --- a/cmd/unset/register.pl +++ b/cmd/unset/register.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my @args = split /\s+/, $line; diff --git a/cmd/unset/routepc19.pl b/cmd/unset/routepc19.pl index 3b6ca355..ffb46f89 100644 --- a/cmd/unset/routepc19.pl +++ b/cmd/unset/routepc19.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2002 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/send_dbg.pl b/cmd/unset/send_dbg.pl index 6173644c..b1bb492e 100644 --- a/cmd/unset/send_dbg.pl +++ b/cmd/unset/send_dbg.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/sendpc16.pl b/cmd/unset/sendpc16.pl index 0531905f..59919491 100644 --- a/cmd/unset/sendpc16.pl +++ b/cmd/unset/sendpc16.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2002 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/startup.pl b/cmd/unset/startup.pl index 77cc3ea4..60efbda6 100644 --- a/cmd/unset/startup.pl +++ b/cmd/unset/startup.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2005 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; return (1, $self->msg('e5')) if $self->remotecmd || $self->inscript; diff --git a/cmd/unset/talk.pl b/cmd/unset/talk.pl index c693cca5..d2c1762c 100644 --- a/cmd/unset/talk.pl +++ b/cmd/unset/talk.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/usstate.pl b/cmd/unset/usstate.pl index 3bfaf6dd..df61bae5 100644 --- a/cmd/unset/usstate.pl +++ b/cmd/unset/usstate.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2003 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/ve7cc.pl b/cmd/unset/ve7cc.pl index 8b6d8637..d8c6df28 100644 --- a/cmd/unset/ve7cc.pl +++ b/cmd/unset/ve7cc.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2000 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/wantpc16.pl b/cmd/unset/wantpc16.pl index c8536a96..f87b6db5 100644 --- a/cmd/unset/wantpc16.pl +++ b/cmd/unset/wantpc16.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2002 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/wantpc9x.pl b/cmd/unset/wantpc9x.pl index 0c14ca23..2bc876ba 100644 --- a/cmd/unset/wantpc9x.pl +++ b/cmd/unset/wantpc9x.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2007 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/wcy.pl b/cmd/unset/wcy.pl index 8d1cdbeb..f5df7a31 100644 --- a/cmd/unset/wcy.pl +++ b/cmd/unset/wcy.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/wwv.pl b/cmd/unset/wwv.pl index 57b04119..67e014b5 100644 --- a/cmd/unset/wwv.pl +++ b/cmd/unset/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/unset/wx.pl b/cmd/unset/wx.pl index 21ed1a1c..c1bb8a3c 100644 --- a/cmd/unset/wx.pl +++ b/cmd/unset/wx.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1999 - Dirk Koopman # -# $Id$ +# # my ($self, $line) = @_; diff --git a/cmd/wcy.pl b/cmd/wcy.pl index bdd01fc4..705c2159 100644 --- a/cmd/wcy.pl +++ b/cmd/wcy.pl @@ -22,7 +22,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my $call = $self->call; diff --git a/cmd/who.pl b/cmd/who.pl index 12010d81..b068c586 100644 --- a/cmd/who.pl +++ b/cmd/who.pl @@ -4,7 +4,7 @@ # # Copyright (c) 1999 Dirk Koopman G1TLH # -# $Id$ +# my $self = shift; diff --git a/cmd/wwv.pl b/cmd/wwv.pl index 9ff5cb58..98930c89 100644 --- a/cmd/wwv.pl +++ b/cmd/wwv.pl @@ -21,7 +21,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; my $call = $self->call; diff --git a/cmd/wx.pl b/cmd/wx.pl index 02572936..73e2e566 100644 --- a/cmd/wx.pl +++ b/cmd/wx.pl @@ -11,7 +11,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; diff --git a/gtkconsole/Screen.pm b/gtkconsole/Screen.pm index ce53dc29..cba19833 100644 --- a/gtkconsole/Screen.pm +++ b/gtkconsole/Screen.pm @@ -3,7 +3,7 @@ # # This produces the Gtk for all the little sub-screens # -# $Id$ +# # # Copyright (c) 2006 Dirk Koopman G1TLH # diff --git a/gtkconsole/Text.pm b/gtkconsole/Text.pm index 8957da25..746fab81 100644 --- a/gtkconsole/Text.pm +++ b/gtkconsole/Text.pm @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # package Text; diff --git a/gtkconsole/gtkconsole b/gtkconsole/gtkconsole index 2af1c4e9..bfeddb61 100755 --- a/gtkconsole/gtkconsole +++ b/gtkconsole/gtkconsole @@ -6,7 +6,7 @@ # # Copyright (c) 2006-2007 Dirk Koopman G1TLH # -# $Id$ +# # use strict; diff --git a/gtkconsole/gtkconsolerc b/gtkconsole/gtkconsolerc index ddd0226b..8c1e33b7 100644 --- a/gtkconsole/gtkconsolerc +++ b/gtkconsole/gtkconsolerc @@ -1,7 +1,7 @@ # # Standard RC file for gtkconsole # -# $Id$ +# # style "std_gtkconsole" { diff --git a/perl/Version.pm b/perl/Version.pm index 1489fa48..646b2ef2 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 = '113'; +$build = '114'; 1;