allow 4 letter callsigns, add git id sh/version
[spider.git] / cmd / show / version.pl
index 36d4464b1d724735e2f03add01f46b44c53a06bd..7107570d969c0e5108b57bb48508b89c81285351 100644 (file)
@@ -3,12 +3,13 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 
 my @out;
-
-push @out, "DX Spider Cluster version $main::version (build $main::build) on \u$^O";
-push @out, "Copyright (c) 1998-2002 Dirk Koopman G1TLH";
+my ($year) = (gmtime($main::systime))[5];
+$year += 1900;
+push @out, "DX Spider Cluster version $main::version (build $main::subversion.$main::build git: $main::gitversion) on \u$^O";
+push @out, "Copyright (c) 1998-$year Dirk Koopman G1TLH";
 
 return (1, @out);