From ca298fe5fa5a945184e385183cb8e177b5889a9d Mon Sep 17 00:00:00 2001 From: minima Date: Fri, 27 May 2005 08:07:01 +0000 Subject: [PATCH] make copyright on startup show this year --- Changes | 2 ++ perl/cluster.pl | 4 +++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/Changes b/Changes index 9d6fb71d..a19b9417 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,5 @@ +27May05======================================================================= +1. change copyright in dbg message at startup. 25May05======================================================================= 1. Added a means to import a script of arbitrary commands to allow external programs to do stuff. diff --git a/perl/cluster.pl b/perl/cluster.pl index 5fc41ef7..a9b64509 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -346,7 +346,9 @@ $build = "$build.$branch" if $branch; Log('cluster', "DXSpider V$version, build $build started"); # banner -dbg("Copyright (c) 1998-2002 Dirk Koopman G1TLH"); +my ($year) = (gmtime)[5]; +$year += 1900; +dbg("Copyright (c) 1998-$year Dirk Koopman G1TLH"); dbg("DXSpider Version $version, build $build started"); # load Prefixes -- 2.43.0