fix sh/c
[spider.git] / cmd / show / version.pl
index 36d4464b1d724735e2f03add01f46b44c53a06bd..f8066d8b9a7f9cfb0c998350e0be257318e0a68c 100644 (file)
@@ -7,8 +7,9 @@
 #
 
 my @out;
-
+my ($year) = (gmtime($main::systime))[5];
+$year += 1900;
 push @out, "DX Spider Cluster version $main::version (build $main::build) on \u$^O";
-push @out, "Copyright (c) 1998-2002 Dirk Koopman G1TLH";
+push @out, "Copyright (c) 1998-$year Dirk Koopman G1TLH";
 
 return (1, @out);